66 #ifndef PYNE_IS_AMALGAMATED
67 extern "C" double endftod_(
char *str,
int len);
70 #ifndef PYNE_IS_AMALGAMATED
81 #if defined __WIN_MSVC__
84 errno_t errPYNE_DATA = _dupenv_s(&tmpPYNE_DATA, &lenPYNE_DATA,
"PYNE_DATA");
86 tmpPYNE_DATA = (
char *)
"<NOT_FOUND>";
89 char * tmpNUC_DATA_PATH;
90 size_t lenNUC_DATA_PATH;
91 errno_t errNUC_DATA_PATH = _dupenv_s(&tmpNUC_DATA_PATH, &lenNUC_DATA_PATH,
"NUC_DATA_PATH");
93 tmpNUC_DATA_PATH = (
char *)
"<NOT_FOUND>";
97 tmppath = getenv(
"PYNE_DATA");
99 tmppath = (
char *)
"<NOT_FOUND>";
102 tmppath = getenv(
"NUC_DATA_PATH");
104 tmppath = (
char *)
"<NOT_FOUND>";
114 std::stringstream ss;
120 std::stringstream ss;
126 std::stringstream ss;
132 std::stringstream ss;
139 return atoi( s.c_str() );
143 return strtod( s.c_str(), NULL );
154 if (s[9] ==
'+' or s[9] ==
'-') {
156 mant = s[8] + 10 * s[7] + 100 * s[6] + 1000 * s[5] + 10000 * s[4] + \
157 100000 * s[3] + 1000000 * s[1] - 1111111 *
'0';
160 dbl_exp = exp & 01? 10.: 1;
161 dbl_exp *= (exp >>= 1) & 01? 100.: 1;
162 dbl_exp *= (exp >>= 1) & 01? 1.0e4: 1;
163 dbl_exp *= (exp >>= 1) & 01? 1.0e8: 1;
165 dbl_exp = (s[9] ==
'-'? 1/dbl_exp: dbl_exp) * 1.0e-6;
167 v = mant * (s[0] ==
'-'? -1: 1) * dbl_exp;
170 mant = s[7] + 10 * s[6] + 100 * s[5] + 1000 * s[4] + 10000 * s[3] + \
171 100000 * s[1] - 111111 *
'0';
172 exp = s[10] + 10 * s[9] - 11 *
'0';
173 dbl_exp = exp & 01? 10.: 1;
174 dbl_exp *= (exp >>= 1) & 01? 100.: 1;
175 dbl_exp *= (exp >>= 1) & 01? 1.0e4: 1;
176 dbl_exp *= (exp >>= 1) & 01? 1.0e8: 1;
177 dbl_exp *= (exp >>= 1) & 01? 1.0e16: 1;
178 dbl_exp *= (exp >>= 1) & 01? 1.0e32: 1;
179 dbl_exp *= (exp >>= 1) & 01? 1.0e64: 1;
180 dbl_exp = (s[8] ==
'-'? 1/dbl_exp: dbl_exp) * 1.0e-5;
181 v = mant * (s[0] ==
'-'? -1: 1) * dbl_exp;
191 while (s[pos] !=
'-' and s[pos] !=
'+' and s[pos] !=
' ' and pos > 0) {
192 v += mant * (s[pos] -
'0');
196 v *= (s[pos] ==
'-'? -1: 1);
202 #ifdef PYNE_IS_AMALGAMATED
205 return endftod_(s, 12);
217 for(
unsigned int i = 0; i < s.length(); i++)
218 s[i] = toupper(s[i]);
224 for(
unsigned int i = 0; i < s.length(); i++)
225 s[i] = tolower(s[i]);
231 unsigned int slen = s.length();
235 s[0] = toupper(s[0]);
237 for(
unsigned int i = 1; i < slen; i++)
238 s[i] = tolower(s[i]);
245 for (
int i = 0; i < max_l; i++)
247 if (line[i] ==
'\t' || line[i] ==
'\n' || line[i] ==
' ' || line[i] ==
'\0')
253 tempflag[i] = line[i];
255 return std::string (tempflag);
262 int n_found = s.find(substr);
263 while ( 0 <= n_found ) {
264 s.erase( n_found , substr.length() );
265 n_found = s.find(substr);
273 for (
int i = 0; i < chars.length(); i++ ) {
282 int n_found = s.find(substr);
283 while ( 0 <= n_found ) {
284 s.replace( n_found , substr.length(), repstr );
285 n_found = s.find(substr);
294 return s.substr(s.length()-1, 1);
300 return s.substr(s.length()+n, l);
306 return (a <= b && b <= c);
312 int n = s.find(substr);
313 return ( 0 <= n && n < s.length() );
320 std::string nat_name (name);
329 while ( n < nat_name.length() ) {
330 if (
pyne::words.find(nat_name[n]) == std::string::npos )
331 nat_name.erase(n, 1);
337 if (nat_name.length() == 0)
341 if (
pyne::digits.find(nat_name[0]) != std::string::npos)
342 nat_name.insert(0,
"_");
354 return (y2 - y1) / (x2 - x1);
359 return (
slope(x2,y2,x1,y1) * (x - x2)) + y2;
378 struct stat stFileInfo;
383 intStat = stat(strfilename.c_str(), &stFileInfo);
415 std::cout <<
"\033[1;33m WARNING: \033[0m" << s <<
"\n";
432 #ifndef PYNE_4HFU6PUEQJB3ZJ4UIFLVU4SPCM
433 #define PYNE_4HFU6PUEQJB3ZJ4UIFLVU4SPCM
436 #define TOTAL_STATE_MAPS 922
2298 #ifndef PYNE_IS_AMALGAMATED
2299 #include "nucname.h"
2300 #include "state_map.cpp"
2434 zld[i->second] = i->first;
2446 fzd[
"BERYLLIU"] = 40000000;
2447 fzd[
"BARIUM"] = 560000000;
2448 fzd[
"BOHRIUM"] = 1070000000;
2449 fzd[
"BISMUTH"] = 830000000;
2450 fzd[
"BERKELIU"] = 970000000;
2451 fzd[
"BROMINE"] = 350000000;
2452 fzd[
"RUTHENIU"] = 440000000;
2453 fzd[
"RHENIUM"] = 750000000;
2454 fzd[
"RUTHERFO"] = 1040000000;
2455 fzd[
"ROENTGEN"] = 1110000000;
2456 fzd[
"RADIUM"] = 880000000;
2457 fzd[
"RUBIDIUM"] = 370000000;
2458 fzd[
"RADON"] = 860000000;
2459 fzd[
"RHODIUM"] = 450000000;
2460 fzd[
"THULIUM"] = 690000000;
2461 fzd[
"HYDROGEN"] = 10000000;
2462 fzd[
"PHOSPHO"] = 150000000;
2463 fzd[
"GERMANIU"] = 320000000;
2464 fzd[
"GADOLINI"] = 640000000;
2465 fzd[
"GALLIUM"] = 310000000;
2466 fzd[
"OSMIUM"] = 760000000;
2467 fzd[
"HASSIUM"] = 1080000000;
2468 fzd[
"ZINC"] = 300000000;
2469 fzd[
"HOLMIUM"] = 670000000;
2470 fzd[
"HAFNIUM"] = 720000000;
2471 fzd[
"MERCURY"] = 800000000;
2472 fzd[
"HELIUM"] = 20000000;
2473 fzd[
"PRASEODY"] = 590000000;
2474 fzd[
"PLATINUM"] = 780000000;
2475 fzd[
"239-PU"] = 940000000;
2476 fzd[
"LEAD"] = 820000000;
2477 fzd[
"PROTACTI"] = 910000000;
2478 fzd[
"PALLADIU"] = 460000000;
2479 fzd[
"POLONIUM"] = 840000000;
2480 fzd[
"PROMETHI"] = 610000000;
2481 fzd[
"CARBON"] = 60000000;
2482 fzd[
"POTASSIU"] = 190000000;
2483 fzd[
"OXYGEN"] = 80000000;
2484 fzd[
"SULFUR"] = 160000000;
2485 fzd[
"TUNGSTEN"] = 740000000;
2486 fzd[
"EUROPIUM"] = 630000000;
2487 fzd[
"EINSTEIN"] = 990000000;
2488 fzd[
"ERBIUM"] = 680000000;
2489 fzd[
"MENDELEV"] = 1010000000;
2490 fzd[
"MAGNESIU"] = 120000000;
2491 fzd[
"MOLYBDEN"] = 420000000;
2492 fzd[
"MANGANES"] = 250000000;
2493 fzd[
"MEITNERI"] = 1090000000;
2494 fzd[
"URANIUM"] = 920000000;
2495 fzd[
"FRANCIUM"] = 870000000;
2496 fzd[
"IRON"] = 260000000;
2497 fzd[
"FERMIUM"] = 1000000000;
2498 fzd[
"NICKEL"] = 280000000;
2499 fzd[
"NITROGEN"] = 70000000;
2500 fzd[
"NOBELIUM"] = 1020000000;
2501 fzd[
"SODIUM"] = 110000000;
2502 fzd[
"NIOBIUM"] = 410000000;
2503 fzd[
"NEODYMIU"] = 600000000;
2504 fzd[
"NEON"] = 100000000;
2505 fzd[
"ZIRCONIU"] = 400000000;
2506 fzd[
"NEPTUNIU"] = 930000000;
2507 fzd[
"BORON"] = 50000000;
2508 fzd[
"COBALT"] = 270000000;
2509 fzd[
"CURIUM"] = 960000000;
2510 fzd[
"FLUORINE"] = 90000000;
2511 fzd[
"CALCIUM"] = 200000000;
2512 fzd[
"CALIFORN"] = 980000000;
2513 fzd[
"CERIUM"] = 580000000;
2514 fzd[
"CADMIUM"] = 480000000;
2515 fzd[
"VANADIUM"] = 230000000;
2516 fzd[
"CESIUM"] = 550000000;
2517 fzd[
"CHROMIUM"] = 240000000;
2518 fzd[
"COPPER"] = 290000000;
2519 fzd[
"STRONTIU"] = 380000000;
2520 fzd[
"KRYPTON"] = 360000000;
2521 fzd[
"SILICON"] = 140000000;
2522 fzd[
"TIN"] = 500000000;
2523 fzd[
"SAMARIUM"] = 620000000;
2524 fzd[
"SCANDIUM"] = 210000000;
2525 fzd[
"ANTIMONY"] = 510000000;
2526 fzd[
"SEABORGI"] = 1060000000;
2527 fzd[
"SELENIUM"] = 340000000;
2528 fzd[
"YTTERBIU"] = 700000000;
2529 fzd[
"DUBNIUM"] = 1050000000;
2530 fzd[
"DYSPROSI"] = 660000000;
2531 fzd[
"DARMSTAD"] = 1100000000;
2532 fzd[
"LANTHANU"] = 570000000;
2533 fzd[
"CHLORINE"] = 170000000;
2534 fzd[
"LITHIUM"] = 030000000;
2535 fzd[
"THALLIUM"] = 810000000;
2536 fzd[
"LUTETIUM"] = 710000000;
2537 fzd[
"LAWRENCI"] = 1030000000;
2538 fzd[
"THORIUM"] = 900000000;
2539 fzd[
"TITANIUM"] = 220000000;
2540 fzd[
"TELLURIU"] = 520000000;
2541 fzd[
"TERBIUM"] = 650000000;
2542 fzd[
"99-TC"] = 430000000;
2543 fzd[
"TANTALUM"] = 730000000;
2544 fzd[
"ACTINIUM"] = 890000000;
2545 fzd[
"SILVER"] = 470000000;
2546 fzd[
"IODINE"] = 530000000;
2547 fzd[
"IRIDIUM"] = 770000000;
2548 fzd[
"241-AM"] = 950000000;
2549 fzd[
"ALUMINUM"] = 130000000;
2550 fzd[
"ARSENIC"] = 330000000;
2551 fzd[
"ARGON"] = 180000000;
2552 fzd[
"GOLD"] = 790000000;
2553 fzd[
"ASTATINE"] = 850000000;
2554 fzd[
"INDIUM"] = 490000000;
2555 fzd[
"YTTRIUM"] = 390000000;
2556 fzd[
"XENON"] = 540000000;
2557 fzd[
"COPERNIC"] = 1120000000;
2558 fzd[
"UNUNQUAD"] = 1140000000;
2559 fzd[
"UNUNHEXI"] = 1160000000;
2560 fzd[
"HYDROG-1"] = 10010000;
2561 fzd[
"DEUTERIU"] = 10020000;
2562 fzd[
"TRITIUM"] = 10040000;
2563 fzd[
"HELIUM-3"] = 20030000;
2564 fzd[
"HELIUM-4"] = 20040000;
2565 fzd[
"LITHIU-6"] = 30060000;
2566 fzd[
"LITHIU-7"] = 30070000;
2567 fzd[
"BORON-10"] = 50100000;
2568 fzd[
"BORON-11"] = 50110000;
2569 fzd[
"90-SR"] = 380900000;
2570 fzd[
"129-I"] = 531290000;
2571 fzd[
"124-XE"] = 541240000;
2572 fzd[
"126-XE"] = 541260000;
2573 fzd[
"128-XE"] = 541280000;
2574 fzd[
"130-XE"] = 541300000;
2575 fzd[
"131-XE"] = 541310000;
2576 fzd[
"132-XE"] = 541320000;
2577 fzd[
"134-XE"] = 541340000;
2578 fzd[
"135-XE"] = 541350000;
2579 fzd[
"136-XE"] = 541360000;
2580 fzd[
"135-CS"] = 551350000;
2581 fzd[
"137-CS"] = 551370000;
2582 fzd[
"230-TH"] = 902300000;
2583 fzd[
"232-TH"] = 902320000;
2584 fzd[
"233-U"] = 922330000;
2585 fzd[
"234-U"] = 922340000;
2586 fzd[
"235-U"] = 922350000;
2587 fzd[
"238-U"] = 922380000;
2600 zfd[i->second] = i->first;
2622 "Pm",
"Sm",
"Eu",
"Gd",
"Tb",
"Dy",
"Ho",
"Er",
"Tm",
"Yb",
"Lu"};
2630 "Np",
"Pu",
"Am",
"Cm",
"Bk",
"Cf",
"Es",
"Fm",
"Md",
"No",
"Lr"};
2636 "Bk",
"Cf",
"Es",
"Fm",
"Md",
"No",
"Lr",
"Rf",
"Db",
"Sg",
"Bh",
"Hs",
"Mt",
2637 "Ds",
"Rg",
"Cn",
"Fl",
"Lv"};
2645 "Cf",
"Es",
"Fm",
"Md",
"No",
"Lr"};
2653 "At",
"Au",
"B",
"Ba",
"Be",
"Bi",
"Br",
"C",
"Ca",
"Cd",
"Ce",
"Cl",
"Co",
2654 "Cr",
"Cs",
"Cu",
"Dy",
"Er",
"Eu",
"F",
"Fe",
"Fr",
"Ga",
"Gd",
"Ge",
"H",
2655 "He",
"Hf",
"Hg",
"Ho",
"I",
"In",
"Ir",
"K",
"Kr",
"La",
"Li",
"Lu",
"Mg",
2656 "Mn",
"Mo",
"N",
"Na",
"Nb",
"Nd",
"Ne",
"Ni",
"O",
"Os",
"P",
"Pb",
"Pd",
2657 "Pm",
"Po",
"Pr",
"Pt",
"Ra",
"Rb",
"Re",
"Rh",
"Rn",
"Ru",
"S",
"Sb",
"Sc",
2658 "Se",
"Si",
"Sm",
"Sn",
"Sr",
"Ta",
"Tb",
"Tc",
"Te",
"Ti",
"Tl",
"Tm",
"V",
2659 "W",
"Xe",
"Y",
"Yb",
"Zn",
"Zr"};
2701 int zzz = n / 10000000;
2702 int aaa = (n % 10000000) / 10000;
2720 int zzz = nuc / 10000000;
2721 int aaassss = nuc % 10000000;
2722 int aaa = aaassss / 10000;
2723 int ssss = aaassss % 10000;
2725 if (0 < zzz && zzz <= aaa && aaa <= zzz * 7) {
2729 warning(
"You have indicated a metastable state of " +
pyne::to_str(ssss) +
". Metastable state above 5, possibly unphysical. ");
2732 }
else if (aaassss == 0 && 0 <
zz_name.count(zzz)) {
2735 }
else if (nuc < 1000 && 0 <
zz_name.count(nuc))
2737 return nuc * 10000000;
2741 aaassss = nuc % 10000;
2744 if (zzz <= aaa && aaa <= zzz * 7) {
2748 warning(
"You have indicated a metastable state of " +
pyne::to_str(ssss) +
". Metastable state above 5, possibly unphysical. ");
2750 return (zzz*10000000) + (aaa*10000) + (nuc%10);
2751 }
else if (aaa <= zzz && zzz <= aaa * 7 && 0 <
zz_name.count(aaa)) {
2755 warning(
"You have indicated a metastable state of " +
pyne::to_str(ssss) +
". Metastable state above 5, possibly unphysical. ");
2757 return (aaa*10000000) + (zzz*10000) + (nuc%10);
2760 else if (aaassss == 0 && 0 <
zz_name.count(zzz)) {
2762 return zzz * 10000000;
2765 if (nuc >= 1000000){
2776 if (aaa - 400 < 0) {
2778 return nuc * 10000 + 1;
2784 return (95642 - 400)*10000;
2785 nuc = ((nuc - 400) * 10000) + 1;
2786 while (3.0 < (
float ((nuc/10000)%1000) / float (nuc/10000000)))
2790 }
else if (aaa == 0 && 0 <
zz_name.count(zzz)) {
2792 return zzz * 10000000;
2799 return nuc * 10000000;
2804 std::string newnuc (nuc);
2809 size_t npos = std::string::npos;
2813 std::string elem_name;
2814 int dash1 = nuc.find(
"-");
2819 dash2 = nuc.find(
"-", dash1+1);
2822 if (nuc.length() >= 5 && dash1 != npos && dash2 != npos) {
2824 std::string zz = nuc.substr(0, dash1);
2825 std::string ll = nuc.substr(dash1+1, dash2);
2828 if(
znum(ll) != zz_int)
2829 throw NotANuclide(nuc,
"mismatched znum and chemical symbol");
2836 int nuclen = nucstr.length();
2843 newnuc =
id(newnuc);
2853 if (0 <
name_zz.count(elem_name))
2854 newnuc = (10000000 *
name_zz[elem_name]) + newnuc;
2863 if (anum_str.empty()) {
2865 if (0 <
name_zz.count(elem_name))
2866 return 10000000 *
name_zz[elem_name];
2877 if (end_char ==
"M")
2878 newnuc = (10000 *
anum) + 1;
2880 newnuc = (10000 * anum);
2887 if (0 <
name_zz.count(elem_name))
2888 newnuc = (10000000 *
name_zz[elem_name]) + newnuc;
2931 if (zzz > 0 && aaa == 0)
2940 int nucid =
id(nuc);
2941 std::string newnuc =
"";
2943 int zzz = nucid / 10000000;
2944 int ssss = nucid % 10000;
2945 int aaassss = nucid % 10000000;
2946 int aaa = aaassss / 10000;
2969 std::string newnuc (nuc);
2970 return name(newnuc);
2975 return name(
id(nuc));
2983 return id(nuc) / 10000000;
2987 return id(nuc) / 10000000;
2991 return id(nuc) / 10000000;
2998 return (
id(nuc) / 10000) % 1000;
3002 return (
id(nuc) / 10000) % 1000;
3006 return (
id(nuc) / 10000) % 1000;
3013 return id(nuc) % 10000;
3017 return id(nuc) % 10000;
3021 return id(nuc) % 10000;
3028 int nucid =
id(nuc);
3029 int zzzaaa = nucid / 10000;
3030 int ssss = nucid % 10000;
3033 return zzzaaa*10 + ssss;
3038 std::string newnuc (nuc);
3049 return (nuc/10)*10000 + (nuc%10);
3066 int nucid =
id(nuc);
3067 int zzzaaa = nucid/10000;
3074 std::string newnuc (nuc);
3102 int nucid =
id(nuc);
3103 std::string newnuc =
"";
3105 int ssss = nucid % 10000;
3106 int aaassss = nucid % 10000000;
3107 int zzz = nucid / 10000000;
3108 int aaa = aaassss / 10000;
3131 std::string newnuc (nuc);
3150 std::string elem_name;
3161 int nuclen = nucstr.length();
3169 if (0 <
name_zz.count(elem_name))
3170 return 10000000 *
name_zz[elem_name];
3176 if (end_char ==
"M")
3177 nucid = (10000 *
anum) + 1;
3179 nucid = (10000 * anum);
3186 if (0 <
name_zz.count(elem_name))
3187 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3198 int ssss = nuc % 10000;
3199 int newnuc = nuc / 10000;
3202 if (newnuc == 95242 && ssss < 2)
3203 ssss = (ssss + 1) % 2;
3206 if (0 != ssss && ssss < 10)
3207 newnuc += 300 + (ssss * 100);
3215 std::string newnuc (nuc);
3216 return mcnp(newnuc);
3222 return mcnp(
id(nuc));
3229 int zzz = nuc / 1000;
3230 int aaa = nuc % 1000;
3233 else if (zzz <= aaa) {
3234 if (aaa - 400 < 0) {
3236 return nuc * 10000 + 1;
3242 return (95642 - 400)*10000;
3243 nuc = ((nuc - 400) * 10000) + 1;
3244 while (3.0 < (
float ((nuc/10000)%1000) / float (nuc/10000000)))
3248 }
else if (aaa == 0)
3250 return zzz * 10000000;
3271 throw NotANuclide(nuc,
"fluka name could not be found");
3282 throw NotANuclide(-1,
"No nuclide: fluka name could not be found");
3296 int nucid =
id(nuc);
3297 std::string newnuc =
"";
3299 int ssss = nucid % 10000;
3300 int aaassss = nucid % 10000000;
3301 int zzz = nucid / 10000000;
3302 int aaa = aaassss / 10000;
3311 newnuc += llupper[0];
3312 for (
int l = 1; l < lllower.size(); l++)
3313 newnuc += lllower[l];
3321 else if (0 == aaassss)
3333 std::string newnuc (nuc);
3360 std::string elem_name;
3365 int nuclen = nucstr.length();
3373 if (0 <
name_zz.count(elem_name))
3374 return 10000000 *
name_zz[elem_name];
3380 if (end_char ==
"M")
3381 nucid = (10000 *
anum) + 1;
3383 nucid = (10000 * anum);
3390 if (0 <
name_zz.count(elem_name))
3391 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3402 int nucid =
id(nuc);
3403 std::string newnuc =
"";
3405 int zzz = nucid / 10000000;
3406 int ssss = nucid % 10000;
3407 int aaassss = nucid % 10000000;
3408 int aaa = aaassss / 10000;
3421 newnuc += name_upper[0];
3422 for (
int l = 1; l < name_lower.size(); l++)
3423 newnuc += name_lower[l];
3436 std::string newnuc (nuc);
3437 return nist(newnuc);
3442 return nist(
id(nuc));
3463 std::string elem_name;
3464 int nuclen = nuc.length();
3470 if (anum_str.empty()) {
3472 if (0 <
name_zz.count(elem_name))
3473 return 10000000 *
name_zz[elem_name];
3480 if (0 <
name_zz.count(elem_name))
3481 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3493 int nucid =
id(nuc);
3494 int zzz = nucid / 10000000;
3495 int ssss = nucid % 10000;
3496 int aaassss = nucid % 10000000;
3497 int aaa = aaassss / 10000;
3500 return (aaa*10000) + (zzz*10) + ssss;
3506 std::string newnuc (nuc);
3520 int ssss = nuc % 10;
3521 int aaazzz = nuc / 10;
3522 int zzz = aaazzz % 1000;
3523 int aaa = aaazzz / 1000;
3524 return (zzz * 10000000) + (aaa * 10000) + ssss;
3544 int nucid =
id(nuc);
3545 std::string newnuc =
"";
3546 std::string ll =
"";
3548 int zzz = nucid / 10000000;
3549 int ssss = nucid % 10000;
3550 int aaassss = nucid % 10000000;
3551 int aaa = aaassss / 10000;
3560 for(
int i = 0; ll[i] !=
'\0'; i++)
3561 ll[i] = tolower(ll[i]);
3576 std::string newnuc (nuc);
3577 return alara(newnuc);
3582 return alara(
id(nuc));
3605 std::string elem_name;
3606 int nuclen = nuc.length();
3612 if (anum_str.empty()) {
3614 if (0 <
name_zz.count(elem_name))
3615 return 10000000 *
name_zz[elem_name];
3622 if (0 <
name_zz.count(elem_name))
3623 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3636 int nucid =
id(nuc);
3637 int zzzaaa = nucid / 10000;
3638 int sss = nucid % 10000;
3639 return sss * 1000000 +
zzzaaa;
3644 std::string newnuc (nuc);
3650 return sza(
id(nuc));
3655 int sss = nuc / 1000000;
3656 int zzzaaa = nuc % 1000000;
3659 warning(
"You have indicated a metastable state of " +
pyne::to_str(sss) +
". Metastable state above 5, possibly unphysical. ");
3661 return zzzaaa * 10000 + sss;
3666 std::string newnuc (nuc);
3683 int zzzaaa = (state / 10000) * 10000;
3684 int state_number = state % 10000;
3685 if (state_number == 0)
return state;
3686 std::map<int, int>::iterator nuc_iter, nuc_end;
3690 if (nuc_iter != nuc_end){
3691 int m = (*nuc_iter).second;
3704 int zzzaaa = (nuc_id / 10000) * 10000;
3705 int state = nuc_id % 10000;
3706 if (state == 0)
return nuc_id;
3707 std::map<int, int>::iterator nuc_iter, nuc_end, it;
3711 for (it = nuc_iter; it!= nuc_end; ++it){
3712 if (state == it->second) {
3716 int m = (*nuc_iter).second;
3738 if (nuc.size() < 4) {
3740 }
else if (std::isdigit(nuc[3])) {
3741 int aaa =
to_int(nuc.substr(0, 3));
3743 std::string xx_str = nuc.substr(3,2);
3744 zzz =
to_int(xx_str) + 100;
3745 int nid = 10000 * aaa + 10000000 * zzz;
3761 #ifndef PYNE_IS_AMALGAMATED
3887 "resonance_parameters",
3919 "erel_fission_first",
3920 "erel_fission_second",
3921 "erel_fission_third",
3936 "erel_fission_fourth",
3983 "erel_disappearance",
4002 "fission_product_yield_independent",
4006 "energy_per_fission",
4007 "fission_product_yield_cumulative",
4012 "photon_incoherent",
4013 "scattering_factor_imag",
4014 "scattering_factor_real",
4018 "absorption_photoelectric",
4020 "scattering_electroatomic",
4022 "excitation_electroatomic",
4023 "atomic_relaxation",
4058 "p10_photoelectric",
4059 "p11_photoelectric",
4354 using std::make_pair;
4959 "(z,abs) Absorption",
5031 "(z,disap) Neutron disappearance",
5053 "Resonance Parameters",
5061 "(z,Xpi+) Total pi+ meson production",
5062 "(z,Xpi0) Total pi0 meson production",
5063 "(z,Xpi-) Total pi- meson production",
5064 "(z,Xmu+) Total anti-muon production",
5065 "(z,Xmu-) Total muon production",
5066 "(z,Xk+) Total positive kaon production",
5067 "(z,Xk0long) Total long-lived neutral kaon production",
5068 "(z,Xk0short) Total short-lived neutral kaon production",
5069 "(z,Xk-) Total negative kaon production",
5070 "(z,Xp-) Total anti-proton production",
5071 "(z,Xn-) Total anti-neutron production",
5072 "Average cosine of scattering angle",
5073 "Average logarithmic energy decrement",
5074 "Average xi^2/(2*xi)",
5075 "Energy Release from (z,total)",
5076 "Energy Release from (z,elastic)",
5077 "Energy Release from (z,nonelastic)",
5078 "Energy Release from (z,inelastic)",
5079 "Energy Release from (misc)",
5080 "Energy Release from (z,continuum)",
5081 "Energy Release from (z,2nd)",
5082 "Energy Release from (z,2n)",
5083 "Energy Release from (z,3n)",
5084 "Energy Release from (z,fission)",
5085 "Energy Release from (z,f)",
5086 "Energy Release from (z,nf)",
5087 "Energy Release from (z,2nf)",
5088 "Energy Release from (z,n+a)",
5089 "Energy Release from (z,n+3a)",
5090 "Energy Release from (z,2n+a)",
5091 "Energy Release from (z,3n+a)",
5092 "Energy Release from (z,abs) Absorption",
5093 "Energy Release from (z,n+p)",
5094 "Energy Release from (z,n+2a)",
5095 "Energy Release from (z,2n+2a)",
5096 "Energy Release from (z,nd)",
5097 "Energy Release from (z,nt)",
5098 "Energy Release from (z,n+He3)",
5099 "Energy Release from (z,n+d+3a)",
5100 "Energy Release from (z,n+t+2a)",
5101 "Energy Release from (z,4n)",
5102 "Energy Release from (z,3nf)",
5103 "Energy Release from (z,2n+p)",
5104 "Energy Release from (z,3n+p)",
5105 "Energy Release from (z,n+2p)",
5106 "Energy Release from (z,npa)",
5107 "Energy Release from (z,n0)",
5108 "Energy Release from (z,n1)",
5109 "Energy Release from (z,n2)",
5110 "Energy Release from (z,n3)",
5111 "Energy Release from (z,n4)",
5112 "Energy Release from (z,n5)",
5113 "Energy Release from (z,n6)",
5114 "Energy Release from (z,n7)",
5115 "Energy Release from (z,n8)",
5116 "Energy Release from (z,n9)",
5117 "Energy Release from (z,n10)",
5118 "Energy Release from (z,n11)",
5119 "Energy Release from (z,n12)",
5120 "Energy Release from (z,n13)",
5121 "Energy Release from (z,n14)",
5122 "Energy Release from (z,n15)",
5123 "Energy Release from (z,n16)",
5124 "Energy Release from (z,n17)",
5125 "Energy Release from (z,n18)",
5126 "Energy Release from (z,n19)",
5127 "Energy Release from (z,n20)",
5128 "Energy Release from (z,n21)",
5129 "Energy Release from (z,n22)",
5130 "Energy Release from (z,n23)",
5131 "Energy Release from (z,n24)",
5132 "Energy Release from (z,n25)",
5133 "Energy Release from (z,n26)",
5134 "Energy Release from (z,n27)",
5135 "Energy Release from (z,n28)",
5136 "Energy Release from (z,n29)",
5137 "Energy Release from (z,n30)",
5138 "Energy Release from (z,n31)",
5139 "Energy Release from (z,n32)",
5140 "Energy Release from (z,n33)",
5141 "Energy Release from (z,n34)",
5142 "Energy Release from (z,n35)",
5143 "Energy Release from (z,n36)",
5144 "Energy Release from (z,n37)",
5145 "Energy Release from (z,n38)",
5146 "Energy Release from (z,n39)",
5147 "Energy Release from (z,n40)",
5148 "Energy Release from (z,nc)",
5149 "Energy Release from (z,disap) Neutron disappearance",
5150 "Energy Release from (z,gamma)",
5151 "Energy Release from (z,p)",
5152 "Energy Release from (z,d)",
5153 "Energy Release from (z,t)",
5154 "Energy Release from (z,3He)",
5155 "Energy Release from (z,a)",
5156 "Energy Release from (z,2a)",
5157 "Energy Release from (z,3a)",
5158 "Energy Release from (z,2p)",
5159 "Energy Release from (z,pa)",
5160 "Energy Release from (z,t2a)",
5161 "Energy Release from (z,d2a)",
5162 "Energy Release from (z,pd)",
5163 "Energy Release from (z,pt)",
5164 "Energy Release from (z,da)",
5167 "Total Neutrons per Fission",
5168 "Independent fission product yield",
5169 "Delayed Neutron Data",
5170 "Prompt Neutrons per Fission",
5171 "Radioactive Decay Data",
5172 "Energy Release Due to Fission",
5173 "Cumulative Fission Product Yield",
5174 "Delayed Photon Data",
5175 "Total charged-particle stopping power",
5176 "Total photon interaction",
5177 "Photon coherent scattering",
5178 "Photon incoherent scattering",
5179 "Imaginary scattering factor",
5180 "Real scattering factor",
5181 "Pair production, electron field",
5182 "Total pair production",
5183 "Pair production, nuclear field",
5184 "Photoelectric absorption",
5185 "Photo-excitation cross section",
5186 "Electro-atomic scattering",
5187 "Electro-atomic bremsstrahlung",
5188 "Electro-atomic excitation cross section",
5189 "Atomic relaxation data",
5190 "K (1s1/2) subshell",
5191 "L1 (2s1/2) subshell",
5192 "L2 (2p1/2) subshell",
5193 "L3 (2p3/2) subshell",
5194 "M1 (3s1/2) subshell",
5195 "M2 (3p1/2) subshell",
5196 "M3 (3p3/2) subshell",
5197 "M4 (3d1/2) subshell",
5198 "M5 (3d1/2) subshell",
5199 "N1 (4s1/2) subshell",
5200 "N2 (4p1/2) subshell",
5201 "N3 (4p3/2) subshell",
5202 "N4 (4d3/2) subshell",
5203 "N5 (4d5/2) subshell",
5204 "N6 (4f5/2) subshell",
5205 "N7 (4f7/2) subshell",
5206 "O1 (5s1/2) subshell",
5207 "O2 (5p1/2) subshell",
5208 "O3 (5p3/2) subshell",
5209 "O4 (5d3/2) subshell",
5210 "O5 (5d5/2) subshell",
5211 "O6 (5f5/2) subshell",
5212 "O7 (5f7/2) subshell",
5213 "O8 (5g7/2) subshell",
5214 "O9 (5g9/2) subshell",
5215 "P1 (6s1/2) subshell",
5216 "P2 (6p1/2) subshell",
5217 "P3 (6p3/2) subshell",
5218 "P4 (6d3/2) subshell",
5219 "P5 (6d5/2) subshell",
5220 "P6 (6f5/2) subshell",
5221 "P7 (6f7/2) subshell",
5222 "P8 (6g7/2) subshell",
5223 "P9 (6g9/2) subshell",
5224 "P10 (6h9/2) subshell",
5225 "P11 (6h11/2) subshell",
5226 "Q1 (7s1/2) subshell",
5227 "Q2 (7p1/2) subshell",
5228 "Q3 (7p3/2) subshell",
5479 "Lumped Covariances",
5480 "Any Excited State",
5506 "(n,total) Neutron total",
5508 "(z,z0) Elastic scattering",
5509 "(z,nonelas) Nonelastic neutron",
5510 "(z,n) One neutron in exit channel",
5511 "(z,anything) Miscellaneous",
5512 "(z,contin) Total continuum reaction",
5513 "(z,2nd) Production of 2n and d",
5514 "(z,2n) Production of 2n",
5515 "(z,2n0) Production of 2n, ground state",
5516 "(z,2n1) Production of 2n, 1st excited state",
5517 "(z,2n2) Production of 2n, 2nd excited state",
5518 "(z,3n) Production of 3n",
5519 "(z,3n0) Production of 3n, ground state",
5520 "(z,3n1) Production of 3n, 1st excited state",
5521 "(z,3n2) Production of 3n, 2nd excited state",
5522 "(z,fiss) Particle-induced fission",
5523 "(z,f) First-chance fission",
5524 "(z,nf) Second chance fission",
5525 "(z,2nf) Third-chance fission",
5526 "(z,na) Production of n and alpha",
5527 "(z,na0) Production of n and alpha, ground state",
5528 "(z,na1) Production of n and alpha, 1st excited state",
5529 "(z,na2) Production of n and alpha, 2nd excited state",
5530 "(z,n3a) Production of n and 3 alphas",
5531 "(z,2na) Production of 2n and alpha",
5532 "(z,3na) Production of 3n and alpha",
5533 "(n,abs) Absorption",
5534 "(z,np) Production of n and p",
5535 "(z,np0) Production of n and p, ground state",
5536 "(z,np1) Production of n and p, 1st excited state",
5537 "(z,np2) Production of n and p, 2nd excited state",
5538 "(z,npd) Production of n, p, and d",
5539 "(z,n2a) Production of n and 2 alphas",
5540 "(z,2n2a) Production of 2n and 2 alphas",
5541 "(z,nd) Production of n and d",
5542 "(z,nd0) Production of n and d, ground state",
5543 "(z,nd1) Production of n and d, 1st excited state",
5544 "(z,nd2) Production of n and d, 2nd excited state",
5545 "(z,nt) Production of n and t",
5546 "(z,nt0) Production of n and t, ground state",
5547 "(z,nt1) Production of n and t, 1st excited state",
5548 "(z,nt2) Production of n and t, 2nd excited state",
5549 "(z,n3He) Production of n and He-3",
5550 "(z,n3He-0) Production of n and He-3, ground state",
5551 "(z,n3He-1) Production of n and He-3, 1st excited state",
5552 "(z,n3He-2) Production of n and He-3, 2nd excited state",
5553 "(z,nd2a) Production of n, d, and alpha",
5554 "(z,nt2a) Production of n, t, and 2 alphas",
5555 "(z,4n) Production of 4n",
5556 "(z,4n0) Production of 4n, ground state",
5557 "(z,4n1) Production of 4n, 1st excited state",
5558 "(z,3nf) Fourth-chance fission",
5559 "(z,2np) Production of 2n and p",
5560 "(z,3np) Production of 3n and p",
5561 "(z,n2p) Production of n and 2p",
5562 "(z,npa) Production of n, p, and alpha",
5563 "(z,n0) Production of n, ground state",
5564 "(z,n1) Production of n, 1st excited state",
5565 "(z,n2) Production of n, 2nd excited state",
5566 "(z,n3) Production of n, 3rd excited state",
5567 "(z,n4) Production of n, 4th excited state",
5568 "(z,n5) Production of n, 5th excited state",
5569 "(z,n6) Production of n, 6th excited state",
5570 "(z,n7) Production of n, 7th excited state",
5571 "(z,n8) Production of n, 8th excited state",
5572 "(z,n9) Production of n, 9th excited state",
5573 "(z,n10) Production of n, 10th excited state",
5574 "(z,n11) Production of n, 11th excited state",
5575 "(z,n12) Production of n, 12th excited state",
5576 "(z,n13) Production of n, 13th excited state",
5577 "(z,n14) Production of n, 14th excited state",
5578 "(z,n15) Production of n, 15th excited state",
5579 "(z,n16) Production of n, 16th excited state",
5580 "(z,n17) Production of n, 17th excited state",
5581 "(z,n18) Production of n, 18th excited state",
5582 "(z,n19) Production of n, 19th excited state",
5583 "(z,n20) Production of n, 20th excited state",
5584 "(z,n21) Production of n, 21st excited state",
5585 "(z,n22) Production of n, 22nd excited state",
5586 "(z,n23) Production of n, 23rd excited state",
5587 "(z,n24) Production of n, 24th excited state",
5588 "(z,n25) Production of n, 25th excited state",
5589 "(z,n26) Production of n, 26th excited state",
5590 "(z,n27) Production of n, 27th excited state",
5591 "(z,n28) Production of n, 28th excited state",
5592 "(z,n29) Production of n, 29th excited state",
5593 "(z,n30) Production of n, 30th excited state",
5594 "(z,n31) Production of n, 31st excited state",
5595 "(z,n32) Production of n, 32nd excited state",
5596 "(z,n33) Production of n, 33rd excited state",
5597 "(z,n34) Production of n, 34th excited state",
5598 "(z,n35) Production of n, 35th excited state",
5599 "(z,n36) Production of n, 36th excited state",
5600 "(z,n37) Production of n, 37th excited state",
5601 "(z,n38) Production of n, 38th excited state",
5602 "(z,n39) Production of n, 39th excited state",
5603 "(z,n40) Production of n, 40th excited state",
5604 "(z,nc) Production of n in continuum",
5605 "(n,disap) Neutron disappearance",
5606 "(z,gamma) Radiative capture",
5607 "(z,gamma0) Radiative capture, ground state",
5608 "(z,gamma1) Radiative capture, 1st excited state",
5609 "(z,gamma2) Radiative capture, 2st excited state",
5610 "(z,p) Production of p",
5611 "(z,d) Production of d",
5612 "(z,t) Production of t",
5613 "(z,3He) Production of He-3",
5614 "(z,a) Production of alpha",
5615 "(z,2a) Production of 2 alphas",
5616 "(z,3a) Production of 3 alphas",
5617 "(z,2p) Production of 2p",
5618 "(z,2p0) Production of 2p, ground state",
5619 "(z,2p1) Production of 2p, 1st excited state",
5620 "(z,2p2) Production of 2p, 2nd excited state",
5621 "(z,pa) Production of p and alpha",
5622 "(z,t2a) Production of t and 2 alphas",
5623 "(z,d2a) Production of d and 2 alphas",
5624 "(z,pd) Production of p and d",
5625 "(z,pt) Production of p and t",
5626 "(z,da) Production of d and a",
5627 "Resonance Parameters",
5628 "(z,Xn) Total neutron production",
5629 "(z,Xgamma) Total gamma production",
5630 "(z,Xp) Total proton production",
5631 "(z,Xd) Total deuteron production",
5632 "(z,Xt) Total triton production",
5633 "(z,X3He) Total He-3 production",
5634 "(z,Xa) Total alpha production",
5635 "(z,Xpi+) Total pi+ meson production",
5636 "(z,Xpi0) Total pi0 meson production",
5637 "(z,Xpi-) Total pi- meson production",
5638 "(z,Xmu+) Total anti-muon production",
5639 "(z,Xmu-) Total muon production",
5640 "(z,Xk+) Total positive kaon production",
5641 "(z,Xk0long) Total long-lived neutral kaon production",
5642 "(z,Xk0short) Total short-lived neutral kaon production",
5643 "(z,Xk-) Total negative kaon production",
5644 "(z,Xp-) Total anti-proton production",
5645 "(z,Xn-) Total anti-neutron production",
5646 "Average cosine of scattering angle",
5647 "Average logarithmic energy decrement",
5648 "Average xi^2/(2*xi)",
5649 "Energy Release from (n,total) Neutron total",
5650 "Energy Release from (z,z0) Elastic scattering",
5651 "Energy Release from (z,nonelas) Nonelastic neutron",
5652 "Energy Release from (z,n) One neutron in exit channel",
5653 "Energy Release from (z,anything) Miscellaneous",
5654 "Energy Release from (z,contin) Total continuum reaction",
5655 "Energy Release from (z,2nd) Production of 2n and d",
5656 "Energy Release from (z,2n) Production of 2n",
5657 "Energy Release from (z,3n) Production of 3n",
5658 "Energy Release from (z,fiss) Particle-induced fission",
5659 "Energy Release from (z,f) First-chance fission",
5660 "Energy Release from (z,nf) Second chance fission",
5661 "Energy Release from (z,2nf) Third-chance fission",
5662 "Energy Release from (z,na) Production of n and alpha",
5663 "Energy Release from (z,n3a) Production of n and 3 alphas",
5664 "Energy Release from (z,2na) Production of 2n and alpha",
5665 "Energy Release from (z,3na) Production of 3n and alpha",
5666 "Energy Release from (n,abs) Absorption",
5667 "Energy Release from (z,np) Production of n and p",
5668 "Energy Release from (z,n2a) Production of n and 2 alphas",
5669 "Energy Release from (z,2n2a) Production of 2n and 2 alphas",
5670 "Energy Release from (z,nd) Production of n and d",
5671 "Energy Release from (z,nt) Production of n and t",
5672 "Energy Release from (z,n3He) Production of n and He-3",
5673 "Energy Release from (z,nd2a) Production of n, d, and alpha",
5674 "Energy Release from (z,nt2a) Production of n, t, and 2 alphas",
5675 "Energy Release from (z,4n) Production of 4n",
5676 "Energy Release from (z,3nf) Fourth-chance fission",
5677 "Energy Release from (z,2np) Production of 2n and p",
5678 "Energy Release from (z,3np) Production of 3n and p",
5679 "Energy Release from (z,n2p) Production of n and 2p",
5680 "Energy Release from (z,npa) Production of n, p, and alpha",
5681 "Energy Release from (z,n0) Production of n, ground state",
5682 "Energy Release from (z,n1) Production of n, 1st excited state",
5683 "Energy Release from (z,n2) Production of n, 2nd excited state",
5684 "Energy Release from (z,n3) Production of n, 3rd excited state",
5685 "Energy Release from (z,n4) Production of n, 4th excited state",
5686 "Energy Release from (z,n5) Production of n, 5th excited state",
5687 "Energy Release from (z,n6) Production of n, 6th excited state",
5688 "Energy Release from (z,n7) Production of n, 7th excited state",
5689 "Energy Release from (z,n8) Production of n, 8th excited state",
5690 "Energy Release from (z,n9) Production of n, 9th excited state",
5691 "Energy Release from (z,n10) Production of n, 10th excited state",
5692 "Energy Release from (z,n11) Production of n, 11th excited state",
5693 "Energy Release from (z,n12) Production of n, 12th excited state",
5694 "Energy Release from (z,n13) Production of n, 13th excited state",
5695 "Energy Release from (z,n14) Production of n, 14th excited state",
5696 "Energy Release from (z,n15) Production of n, 15th excited state",
5697 "Energy Release from (z,n16) Production of n, 16th excited state",
5698 "Energy Release from (z,n17) Production of n, 17th excited state",
5699 "Energy Release from (z,n18) Production of n, 18th excited state",
5700 "Energy Release from (z,n19) Production of n, 19th excited state",
5701 "Energy Release from (z,n20) Production of n, 20th excited state",
5702 "Energy Release from (z,n21) Production of n, 21st excited state",
5703 "Energy Release from (z,n22) Production of n, 22nd excited state",
5704 "Energy Release from (z,n23) Production of n, 23rd excited state",
5705 "Energy Release from (z,n24) Production of n, 24th excited state",
5706 "Energy Release from (z,n25) Production of n, 25th excited state",
5707 "Energy Release from (z,n26) Production of n, 26th excited state",
5708 "Energy Release from (z,n27) Production of n, 27th excited state",
5709 "Energy Release from (z,n28) Production of n, 28th excited state",
5710 "Energy Release from (z,n29) Production of n, 29th excited state",
5711 "Energy Release from (z,n30) Production of n, 30th excited state",
5712 "Energy Release from (z,n31) Production of n, 31st excited state",
5713 "Energy Release from (z,n32) Production of n, 32nd excited state",
5714 "Energy Release from (z,n33) Production of n, 33rd excited state",
5715 "Energy Release from (z,n34) Production of n, 34th excited state",
5716 "Energy Release from (z,n35) Production of n, 35th excited state",
5717 "Energy Release from (z,n36) Production of n, 36th excited state",
5718 "Energy Release from (z,n37) Production of n, 37th excited state",
5719 "Energy Release from (z,n38) Production of n, 38th excited state",
5720 "Energy Release from (z,n39) Production of n, 39th excited state",
5721 "Energy Release from (z,n40) Production of n, 40th excited state",
5722 "Energy Release from (z,nc) Production of n in continuum",
5723 "Energy Release from (n,disap) Neutron disappearance",
5724 "Energy Release from (z,gamma) Radiative capture",
5725 "Energy Release from (z,p) Production of p",
5726 "Energy Release from (z,d) Production of d",
5727 "Energy Release from (z,t) Production of t",
5728 "Energy Release from (z,3He) Production of He-3",
5729 "Energy Release from (z,a) Production of alpha",
5730 "Energy Release from (z,2a) Production of 2 alphas",
5731 "Energy Release from (z,3a) Production of 3 alphas",
5732 "Energy Release from (z,2p) Production of 2p",
5733 "Energy Release from (z,pa) Production of p and alpha",
5734 "Energy Release from (z,t2a) Production of t and 2 alphas",
5735 "Energy Release from (z,d2a) Production of d and 2 alphas",
5736 "Energy Release from (z,pd) Production of p and d",
5737 "Energy Release from (z,pt) Production of p and t",
5738 "Energy Release from (z,da) Production of d and a",
5741 "Total Neutrons per Fission",
5742 "Independent fission product yield",
5743 "Delayed Neutron Data",
5744 "Prompt Neutrons per Fission",
5745 "Radioactive Decay Data",
5746 "Energy Release Due to Fission",
5747 "Cumulative Fission Product Yield",
5748 "Delayed Photon Data",
5749 "Total charged-particle stopping power",
5750 "Total photon interaction",
5751 "Photon coherent scattering",
5752 "Photon incoherent scattering",
5753 "Imaginary scattering factor",
5754 "Real scattering factor",
5755 "Pair production, electron field",
5756 "Total pair production",
5757 "Pair production, nuclear field",
5758 "Photoelectric absorption",
5759 "Photo-excitation cross section",
5760 "Electro-atomic scattering",
5761 "Electro-atomic bremsstrahlung",
5762 "Electro-atomic excitation cross section",
5763 "Atomic relaxation data",
5764 "K (1s1/2) subshell",
5765 "L1 (2s1/2) subshell",
5766 "L2 (2p1/2) subshell",
5767 "L3 (2p3/2) subshell",
5768 "M1 (3s1/2) subshell",
5769 "M2 (3p1/2) subshell",
5770 "M3 (3p3/2) subshell",
5771 "M4 (3d1/2) subshell",
5772 "M5 (3d1/2) subshell",
5773 "N1 (4s1/2) subshell",
5774 "N2 (4p1/2) subshell",
5775 "N3 (4p3/2) subshell",
5776 "N4 (4d3/2) subshell",
5777 "N5 (4d5/2) subshell",
5778 "N6 (4f5/2) subshell",
5779 "N7 (4f7/2) subshell",
5780 "O1 (5s1/2) subshell",
5781 "O2 (5p1/2) subshell",
5782 "O3 (5p3/2) subshell",
5783 "O4 (5d3/2) subshell",
5784 "O5 (5d5/2) subshell",
5785 "O6 (5f5/2) subshell",
5786 "O7 (5f7/2) subshell",
5787 "O8 (5g7/2) subshell",
5788 "O9 (5g9/2) subshell",
5789 "P1 (6s1/2) subshell",
5790 "P2 (6p1/2) subshell",
5791 "P3 (6p3/2) subshell",
5792 "P4 (6d3/2) subshell",
5793 "P5 (6d5/2) subshell",
5794 "P6 (6f5/2) subshell",
5795 "P7 (6f7/2) subshell",
5796 "P8 (6g7/2) subshell",
5797 "P9 (6g9/2) subshell",
5798 "P10 (6h9/2) subshell",
5799 "P11 (6h11/2) subshell",
5800 "Q1 (7s1/2) subshell",
5801 "Q2 (7p1/2) subshell",
5802 "Q3 (7p3/2) subshell",
6053 "Lumped-Reaction Covariances",
6054 "production of any excited state nucleus",
6087 id_mt[rxid] = _mts[i];
6088 mt_id[_mts[i]] = rxid;
6090 labels[rxid] = _labels[i];
6091 docs[rxid] = _docs[i];
6292 std::map<std::pair<std::string, int>,
unsigned int>::iterator ioffid;
6294 id_offset[make_pair(ioffid->first.first, ioffid->second)] = ioffid->first.second;
6330 unsigned int h = 32;
6332 h = ((h << 5) + h) ^ c;
6347 if (0 <
names.count(s))
6355 while(0 <= found && i < I) {
6373 if (0 <
mt_id.count(n))
6381 std::pair<std::string, int> key = std::make_pair(z, to_nuc - from_nuc);
6415 if (0 <
mt_id.count(x))
6425 if (0 <
names.count(x))
6434 std::pair<std::string, int> key = std::make_pair(z, to_nuc - from_nuc);
6462 if (0 ==
id_mt.count(rxid))
6469 if (0 ==
id_mt.count(rxid))
6476 if (0 ==
id_mt.count(rxid))
6483 if (0 ==
id_mt.count(rxid))
6490 if (0 ==
id_mt.count(rxid))
6497 if (0 ==
id_mt.count(rxid))
6504 if (0 ==
id_mt.count(rxid))
6511 if (0 ==
id_mt.count(rxid))
6595 std::pair<std::string, unsigned int> key = std::make_pair(z, rx);
6605 return child(nuc,
id(rx), z);
6623 std::pair<std::string, unsigned int> key = std::make_pair(z, rx);
6633 return parent(nuc,
id(rx), z);
6653 #ifndef PYNE_IS_AMALGAMATED
6677 std::map<std::string, std::string> temp_map;
6679 temp_map[
"/atomic_mass"]=
"10edfdc662e35bdfab91beb89285efff";
6680 temp_map[
"/material_library"]=
"8b10864378fbd88538434679acf908cc";
6681 temp_map[
"/neutron/eaf_xs"]=
"29622c636c4a3a46802207b934f9516c";
6682 temp_map[
"/neutron/scattering_lengths"]=
"a24d391cc9dc0fc146392740bb97ead4";
6683 temp_map[
"/neutron/simple_xs"]=
"3d6e086977783dcdf07e5c6b0c2416be";
6684 temp_map[
"/decay"]=
"4f41f3e46f4306cc44449f08a20922e0";
6685 temp_map[
"/dose_factors"]=
"dafa32c24b2303850a0bebdf3e6b122e";
6711 H5Tinsert(desc,
"mass", HOFFSET(
atomic_mass_data, mass), H5T_NATIVE_DOUBLE);
6712 H5Tinsert(desc,
"error", HOFFSET(
atomic_mass_data, error), H5T_NATIVE_DOUBLE);
6713 H5Tinsert(desc,
"abund", HOFFSET(
atomic_mass_data, abund), H5T_NATIVE_DOUBLE);
6719 hid_t atomic_mass_set = H5Dopen2(nuc_data_h5,
"/atomic_mass", H5P_DEFAULT);
6720 hid_t atomic_mass_space = H5Dget_space(atomic_mass_set);
6721 int atomic_mass_length = H5Sget_simple_extent_npoints(atomic_mass_space);
6725 H5Dread(atomic_mass_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, atomic_mass_array);
6728 H5Dclose(atomic_mass_set);
6729 H5Fclose(nuc_data_h5);
6732 for(
int n = 0; n < atomic_mass_length; n++) {
6733 atomic_mass_map.insert(std::pair<int, double>(atomic_mass_array[n].nuc, \
6734 atomic_mass_array[n].mass));
6736 atomic_mass_array[n].abund));
6739 delete[] atomic_mass_array;
6745 std::map<int, double>::iterator nuc_iter, nuc_end;
6751 if (nuc_iter != nuc_end) {
6752 return (*nuc_iter).second;
6768 if (0 < nucid%10000) {
6779 aw = (double) ((nucid/10000)%1000);
6807 std::map<int, double>::iterator nuc_iter, nuc_end;
6813 if (nuc_iter != nuc_end)
6814 return (*nuc_iter).second;
6829 if (0 < nucid%10000) {
6873 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
q_val_data));
6874 H5Tinsert(desc,
"nuc", HOFFSET(
q_val_data, nuc), H5T_NATIVE_INT);
6875 H5Tinsert(desc,
"q_val", HOFFSET(
q_val_data,
q_val), H5T_NATIVE_DOUBLE);
6882 hid_t q_val_set = H5Dopen2(nuc_data_h5,
"/decay/q_values", H5P_DEFAULT);
6883 hid_t q_val_space = H5Dget_space(q_val_set);
6884 int q_val_length = H5Sget_simple_extent_npoints(q_val_space);
6888 H5Dread(q_val_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, q_val_array);
6891 H5Dclose(q_val_set);
6892 H5Fclose(nuc_data_h5);
6895 for(
int n = 0; n < q_val_length; n++) {
6900 delete[] q_val_array;
6907 std::map<int, double>::iterator nuc_iter, nuc_end;
6913 if (nuc_iter != nuc_end)
6914 return (*nuc_iter).second;
6925 return q_val(nucid);
6936 return q_val(nuc_zz);
6942 return q_val(nuc_zz);
6954 std::map<int, double>::iterator nuc_iter, nuc_end;
6960 if (nuc_iter != nuc_end)
6961 return (*nuc_iter).second;
7020 string_type_ = H5Tcopy(H5T_C_S1);
7021 H5Tset_size(string_type_, 1);
7022 H5Tset_strpad(string_type_, H5T_STR_NULLPAD);
7025 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
dose));
7026 status = H5Tinsert(desc,
"nuc", HOFFSET(
dose, nuc), H5T_NATIVE_INT);
7027 status = H5Tinsert(desc,
"ext_air_dose", HOFFSET(
dose,
ext_air_dose), H5T_NATIVE_DOUBLE);
7028 status = H5Tinsert(desc,
"ratio", HOFFSET(
dose, ratio), H5T_NATIVE_DOUBLE);
7029 status = H5Tinsert(desc,
"ext_soil_dose", HOFFSET(
dose,
ext_soil_dose), H5T_NATIVE_DOUBLE);
7030 status = H5Tinsert(desc,
"ingest_dose", HOFFSET(
dose,
ingest_dose), H5T_NATIVE_DOUBLE);
7031 status = H5Tinsert(desc,
"fluid_frac", HOFFSET(
dose, fluid_frac), H5T_NATIVE_DOUBLE);
7032 status = H5Tinsert(desc,
"inhale_dose", HOFFSET(
dose,
inhale_dose), H5T_NATIVE_DOUBLE);
7033 status = H5Tinsert(desc,
"lung_mod", HOFFSET(
dose, lung_mod), string_type_);
7039 const char * c = source_path.c_str();
7042 hid_t dose_set = H5Dopen2(nuc_data_h5, c, H5P_DEFAULT);
7043 hid_t dose_space = H5Dget_space(dose_set);
7044 int dose_length = H5Sget_simple_extent_npoints(dose_space);
7047 dose * dose_array =
new dose[dose_length];
7048 H5Dread(dose_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, dose_array);
7051 for (
int n = 0; n < dose_length; n++) {
7052 dm[dose_array[n].
nuc] = dose_array[n];
7057 H5Tclose(string_type_);
7058 H5Fclose(nuc_data_h5);
7060 delete[] dose_array;
7069 std::string source_location;
7071 source_location =
"/dose_factors/DOE";
7072 }
else if (source == 2) {
7073 source_location =
"/dose_factors/GENII";
7075 source_location =
"/dose_factors/EPA";
7077 return source_location;
7081 std::map<int, pyne::dose>* dm;
7084 }
else if (source == 2) {
7110 if (dm.count(nucid)==1) {
7111 return dm[nucid].ext_air_dose;
7133 if (dm.count(nucid)==1) {
7134 return dm[nucid].ratio;
7159 if (dm.count(nucid)==1) {
7160 return dm[nucid].ext_soil_dose;
7187 if (dm.count(nucid)==1) {
7188 return dm[nucid].ingest_dose;
7210 if (dm.count(nucid)==1) {
7211 return dm[nucid].fluid_frac;
7238 if (dm.count(nucid)==1) {
7239 return dm[nucid].inhale_dose;
7261 if (dm.count(nucid)==1) {
7262 return std::string(1, dm[nucid].lung_mod);
7309 status = H5Tinsert(desc,
"xs_incoherent", HOFFSET(
scattering_lengths, xs_incoherent),
7317 hid_t scat_len_set = H5Dopen2(nuc_data_h5,
"/neutron/scattering_lengths", H5P_DEFAULT);
7318 hid_t scat_len_space = H5Dget_space(scat_len_set);
7319 int scat_len_length = H5Sget_simple_extent_npoints(scat_len_space);
7323 status = H5Dread(scat_len_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, scat_len_array);
7326 status = H5Dclose(scat_len_set);
7327 status = H5Fclose(nuc_data_h5);
7330 for(
int n = 0; n < scat_len_length; n++) {
7335 delete[] scat_len_array;
7347 std::map<int, xd_complex_t>::iterator nuc_iter, nuc_end;
7353 if (nuc_iter != nuc_end)
7354 return (*nuc_iter).second;
7370 while (nuc_iter != nuc_end) {
7372 bc = (*nuc_iter).second;
7381 while (nuc_iter != nuc_end) {
7383 bc = (*nuc_iter).second;
7419 std::map<int, xd_complex_t>::iterator nuc_iter, nuc_end;
7425 if (nuc_iter != nuc_end)
7426 return (*nuc_iter).second;
7442 while (nuc_iter != nuc_end) {
7444 bi = (*nuc_iter).second;
7453 while (nuc_iter != nuc_end) {
7455 bi = (*nuc_iter).second;
7488 std::map<int, double>::iterator nuc_iter, nuc_end;
7490 nuc_iter =
b_map.find(nuc);
7491 nuc_end =
b_map.end();
7494 if (nuc_iter != nuc_end)
7495 return (*nuc_iter).second;
7501 double b_val = sqrt(bc.re*bc.re + bc.im*bc.im + bi.
re*bi.
re + bi.
im*bi.
im);
7524 std::map<std::pair<int, int>,
double>();
7538 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
wimsdfpy));
7539 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
wimsdfpy, from_nuc),
7541 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
wimsdfpy, to_nuc),
7543 status = H5Tinsert(desc,
"yields", HOFFSET(
wimsdfpy, yields),
7551 hid_t wimsdfpy_set = H5Dopen2(nuc_data_h5,
"/neutron/wimsd_fission_products",
7553 hid_t wimsdfpy_space = H5Dget_space(wimsdfpy_set);
7554 int wimsdfpy_length = H5Sget_simple_extent_npoints(wimsdfpy_space);
7558 status = H5Dread(wimsdfpy_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, wimsdfpy_array);
7561 status = H5Dclose(wimsdfpy_set);
7562 status = H5Fclose(nuc_data_h5);
7565 for(
int n=0; n < wimsdfpy_length; n++) {
7567 wimsdfpy_array[n].to_nuc)] = wimsdfpy_array[n].
yields;
7570 delete[] wimsdfpy_array;
7589 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
ndsfpy));
7590 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
ndsfpy, from_nuc),
7592 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
ndsfpy, to_nuc),
7594 status = H5Tinsert(desc,
"yield_thermal", HOFFSET(
ndsfpy, yield_thermal),
7596 status = H5Tinsert(desc,
"yield_thermal_err", HOFFSET(
ndsfpy, yield_thermal_err),
7598 status = H5Tinsert(desc,
"yield_fast", HOFFSET(
ndsfpy, yield_fast),
7600 status = H5Tinsert(desc,
"yield_fast_err", HOFFSET(
ndsfpy, yield_fast_err),
7602 status = H5Tinsert(desc,
"yield_14MeV", HOFFSET(
ndsfpy, yield_14MeV),
7604 status = H5Tinsert(desc,
"yield_14MeV_err", HOFFSET(
ndsfpy, yield_14MeV_err),
7612 hid_t ndsfpy_set = H5Dopen2(nuc_data_h5,
"/neutron/nds_fission_products",
7614 hid_t ndsfpy_space = H5Dget_space(ndsfpy_set);
7615 int ndsfpy_length = H5Sget_simple_extent_npoints(ndsfpy_space);
7619 status = H5Dread(ndsfpy_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, ndsfpy_array);
7622 status = H5Dclose(ndsfpy_set);
7623 status = H5Fclose(nuc_data_h5);
7628 for(
int n=0; n < ndsfpy_length; n++) {
7635 ndsfpy_data[std::make_pair(ndsfpy_array[n].from_nuc,
7636 ndsfpy_array[n].to_nuc)] = ndsfpysub_temp;
7641 delete[] ndsfpy_array;
7650 std::map<std::pair<int, int>,
double>::iterator fpy_iter, fpy_end;
7653 if (fpy_iter != fpy_end)
7655 return (*fpy_iter).second;
7657 std::map<std::pair<int, int>,
ndsfpysub>::iterator fpy_iter, fpy_end;
7660 if (fpy_iter != fpy_end) {
7664 return (*fpy_iter).second.yield_thermal_err;
7665 return (*fpy_iter).second.yield_thermal;
7669 return (*fpy_iter).second.yield_fast_err;
7670 return (*fpy_iter).second.yield_fast;
7674 return (*fpy_iter).second.yield_14MeV_err;
7675 return (*fpy_iter).second.yield_14MeV;
7686 return fpyield(from_to, 0, get_error);
7689 return fpyield(from_to, source, get_error);
7704 double pyne::fpyield(
char * from_nuc,
char * to_nuc,
int source,
bool get_error) {
7725 const std::pair<int, double>& rhs)
const {
7726 return lhs.second<rhs.second || (!(rhs.second<lhs.second) &&
7727 lhs.first<rhs.first);
7731 double energy_min,
double energy_max,
size_t valoffset, std::map<std::pair<
int,
7732 double>, U> &data) {
7733 typename std::map<std::pair<int, double>, U,
swapmapcompare>::iterator
7734 nuc_iter, nuc_end, it;
7735 std::map<std::pair<int, double>, U,
swapmapcompare> dc(data.begin(),
7737 std::vector<T> result;
7738 if (energy_max < energy_min){
7739 double temp = energy_max;
7740 energy_max = energy_min;
7743 nuc_iter = dc.lower_bound(std::make_pair(0, energy_min));
7744 nuc_end = dc.upper_bound(std::make_pair(9999999999, energy_max));
7747 for (it = nuc_iter; it!= nuc_end; ++it){
7748 ret = (T *)((
char *)&(it->second) + valoffset);
7749 result.push_back(*ret);
7756 return data_access<T, U>(energy_min, energy_max, valoffset, data);
7762 double min,
double max,
size_t valoffset,
7763 std::map<std::pair<int, double>, U> &data) {
7764 typename std::map<std::pair<int, double>, U>::iterator nuc_iter, nuc_end, it;
7765 std::vector<T> result;
7766 nuc_iter = data.lower_bound(std::make_pair(parent,min));
7767 nuc_end = data.upper_bound(std::make_pair(parent,max));
7770 for (it = nuc_iter; it!= nuc_end; ++it){
7771 ret = (T *)((
char *)&(it->second) + valoffset);
7772 result.push_back(*ret);
7779 return data_access<T, U>(
parent, min, max, valoffset, data);
7785 from_to,
size_t valoffset, std::map<std::pair<int, int>, U> &data) {
7786 typename std::map<std::pair<int, int>, U>::iterator nuc_iter, nuc_end;
7788 nuc_iter = data.find(from_to);
7789 nuc_end = data.end();
7792 if (nuc_iter != nuc_end){
7793 ret = (T *)((
char *)&(nuc_iter->second) + valoffset);
7801 return data_access<T, U>(from_to, valoffset, data);
7808 size_t valoffset, std::map<std::pair<int, int>, U> &data){
7809 typename std::map<std::pair<int, int>, U>::iterator nuc_iter, nuc_end, it;
7810 std::vector<T> result;
7811 nuc_iter = data.lower_bound(std::make_pair(parent,0));
7812 nuc_end = data.upper_bound(std::make_pair(parent,9999999999));
7815 for (it = nuc_iter; it!= nuc_end; ++it){
7816 ret = (T *)((
char *)&(it->second) + valoffset);
7817 result.push_back(*ret);
7824 return data_access<T, U>(
parent, valoffset, data);
7830 size_t valoffset, std::map<std::pair<int, unsigned int>, U> &data){
7831 typename std::map<std::pair<int, unsigned int>, U>::iterator nuc_iter,
7833 std::vector<T> result;
7834 nuc_iter = data.lower_bound(std::make_pair(parent,0));
7835 nuc_end = data.upper_bound(std::make_pair(parent,UINT_MAX));
7838 for (it = nuc_iter; it!= nuc_end; ++it){
7839 ret = (T *)((
char *)&(it->second) + valoffset);
7840 result.push_back(*ret);
7847 return data_access<T, U>(
parent, valoffset, data);
7853 size_t valoffset, std::map<int, U> &data){
7854 typename std::map<int, U>::iterator nuc_iter,
7856 nuc_iter = data.find(nuc);
7857 nuc_end = data.end();
7859 if (nuc_iter != nuc_end){
7860 return *(
double *)((
char *)&(nuc_iter->second) + valoffset);
7867 return data_access<U>(nuc, valoffset, data);
7879 template<>
void pyne::_load_data<pyne::atomic>() {
7892 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
atomic));
7893 status = H5Tinsert(desc,
"z", HOFFSET(
atomic, z),
7895 status = H5Tinsert(desc,
"k_shell_fluor", HOFFSET(
atomic, k_shell_fluor),
7897 status = H5Tinsert(desc,
"k_shell_fluor_error", HOFFSET(
atomic, k_shell_fluor_error),
7899 status = H5Tinsert(desc,
"l_shell_fluor", HOFFSET(
atomic, l_shell_fluor),
7901 status = H5Tinsert(desc,
"l_shell_fluor_error", HOFFSET(
atomic, l_shell_fluor_error),
7903 status = H5Tinsert(desc,
"prob", HOFFSET(
atomic, prob),
7905 status = H5Tinsert(desc,
"k_shell_be", HOFFSET(
atomic, k_shell_be),
7907 status = H5Tinsert(desc,
"k_shell_be_err", HOFFSET(
atomic, k_shell_be_err),
7909 status = H5Tinsert(desc,
"li_shell_be", HOFFSET(
atomic, li_shell_be),
7911 status = H5Tinsert(desc,
"li_shell_be_err", HOFFSET(
atomic, li_shell_be_err),
7913 status = H5Tinsert(desc,
"mi_shell_be", HOFFSET(
atomic, mi_shell_be),
7915 status = H5Tinsert(desc,
"mi_shell_be_err", HOFFSET(
atomic, mi_shell_be_err),
7917 status = H5Tinsert(desc,
"ni_shell_be", HOFFSET(
atomic, ni_shell_be),
7919 status = H5Tinsert(desc,
"ni_shell_be_err", HOFFSET(
atomic, ni_shell_be_err),
7921 status = H5Tinsert(desc,
"kb_to_ka", HOFFSET(
atomic, kb_to_ka),
7923 status = H5Tinsert(desc,
"kb_to_ka_err", HOFFSET(
atomic, kb_to_ka_err),
7925 status = H5Tinsert(desc,
"ka2_to_ka1", HOFFSET(
atomic, ka2_to_ka1),
7927 status = H5Tinsert(desc,
"ka2_to_ka1_err", HOFFSET(
atomic, ka2_to_ka1_err),
7929 status = H5Tinsert(desc,
"l_auger", HOFFSET(
atomic, l_auger),
7931 status = H5Tinsert(desc,
"k_auger", HOFFSET(
atomic, k_auger),
7933 status = H5Tinsert(desc,
"ka1_x_ray_en", HOFFSET(
atomic, ka1_x_ray_en),
7935 status = H5Tinsert(desc,
"ka1_x_ray_en_err", HOFFSET(
atomic, ka1_x_ray_en_err),
7937 status = H5Tinsert(desc,
"ka2_x_ray_en", HOFFSET(
atomic, ka2_x_ray_en),
7939 status = H5Tinsert(desc,
"ka2_x_ray_en_err", HOFFSET(
atomic, ka2_x_ray_en_err),
7941 status = H5Tinsert(desc,
"kb_x_ray_en", HOFFSET(
atomic, kb_x_ray_en),
7943 status = H5Tinsert(desc,
"l_x_ray_en", HOFFSET(
atomic, l_x_ray_en),
7950 hid_t atomic_set = H5Dopen2(nuc_data_h5,
"/decay/atomic", H5P_DEFAULT);
7951 hid_t atomic_space = H5Dget_space(atomic_set);
7952 int atomic_length = H5Sget_simple_extent_npoints(atomic_space);
7956 status = H5Dread(atomic_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
7960 status = H5Dclose(atomic_set);
7961 status = H5Fclose(nuc_data_h5);
7963 for (
int i = 0; i < atomic_length; ++i) {
7967 delete[] atomic_array;
7971 std::vector<std::pair<double, double> >
7979 if (!isnan(k_conv)) {
7980 xk = data_access<atomic> (z, offsetof(
atomic, k_shell_fluor),
7982 xka = xk / (1.0 + data_access<atomic> (z, offsetof(
atomic,
7984 xka1 = xka / (1.0 + data_access<atomic> (z, offsetof(
atomic,
7988 if (!isnan(l_conv)) {
7989 xl = (l_conv + k_conv*data_access<atomic> (z, offsetof(
atomic,
7993 }
else if (!isnan(l_conv)) {
7994 xl = l_conv*data_access<atomic> (z, offsetof(
atomic,
7997 std::vector<std::pair<double, double> > result;
7998 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
8000 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
8002 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
8004 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
8016 std::map<std::pair<int,unsigned int>,
8020 template<>
void pyne::_load_data<pyne::level_data>()
8035 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
level_data));
8036 status = H5Tinsert(desc,
"nuc_id", HOFFSET(
level_data, nuc_id),
8038 status = H5Tinsert(desc,
"rx_id", HOFFSET(
level_data, rx_id),
8042 status = H5Tinsert(desc,
"level", HOFFSET(
level_data, level),
8046 status = H5Tinsert(desc,
"metastable", HOFFSET(
level_data, metastable),
8048 status = H5Tinsert(desc,
"special", HOFFSET(
level_data, special),
8054 hid_t level_set = H5Dopen2(nuc_data_h5,
"/decay/level_list", H5P_DEFAULT);
8055 hid_t level_space = H5Dget_space(level_set);
8056 int level_length = H5Sget_simple_extent_npoints(level_space);
8060 status = H5Dread(level_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
8064 status = H5Dclose(level_set);
8065 status = H5Fclose(nuc_data_h5);
8067 for (
int i = 0; i < level_length; ++i) {
8068 if (level_array[i].rx_id == 0)
8070 level_array[i].level)] = level_array[i];
8073 level_array[i].rx_id)] = level_array[i];
8076 delete[] level_array;
8083 int nostate = (nuc / 10000) * 10000;
8088 std::map<std::pair<int, double>,
level_data>::iterator nuc_lower, nuc_upper;
8093 double minv = DBL_MAX;
8096 for (std::map<std::pair<int, double>,
level_data>::iterator it=nuc_lower;
8097 it!=nuc_upper; ++it) {
8098 if ((abs(level - it->second.level) < minv) &&
8099 ((
char)it->second.special == special.c_str()[0]) &&
8100 !isnan(it->second.level)) {
8101 minv = abs(level - it->second.level);
8102 ret_id = it->second.nuc_id;
8120 int nostate = (nuc / 10000) * 10000;
8121 if (m==0)
return nostate;
8126 std::map<std::pair<int, double>,
level_data>::iterator nuc_lower, nuc_upper;
8131 for (std::map<std::pair<int, double>,
level_data>::iterator it=nuc_lower;
8132 it!=nuc_upper; ++it) {
8133 if (it->second.metastable == m)
8134 return it->second.nuc_id;
8154 std::vector<unsigned int> part = data_access<unsigned int, level_data>(nuc,
8156 std::vector<unsigned int>::iterator it = part.begin();
8157 std::set<int> result;
8158 for (; it != part.end(); ++it) {
8162 result.insert((nuc /10000) * 10000);
8167 std::map<std::pair<int, int>,
double>::iterator sf =
wimsdfpy_data.begin();
8169 if (sf->first.first == nuc)
8170 result.insert(sf->first.second);
8174 result.insert((
rxname::child(nuc, *it,
"decay") /10000) * 10000);
8197 std::vector<double> result = data_access<double, level_data>(nuc, 0.0,
8199 if (result.size() == 1)
8200 return result[0]/1000.0;
8222 std::vector<double> result = data_access<double, level_data>(nuc, 0.0,
8224 if (result.size() == 1) {
8225 return log(2.0)/result[0];
8247 std::vector<double> result = data_access<double, level_data>(nuc, 0.0,
8249 if (result.size() == 1) {
8277 vector<unsigned int> part1 = \
8278 data_access<unsigned int, level_data>(from_to.first, offsetof(
level_data, rx_id),
8280 vector<double> part2 = \
8283 double result = 0.0;
8284 if ((from_to.first == from_to.second) && (
decay_const(from_to.first) == 0.0))
8286 for (vector<unsigned int>::size_type i = 0; i < part1.size(); ++i) {
8287 if ((part1[i] == 36125) &&
8289 (from_to.second % 10000 == 0)) {
8293 }
else if (part1[i] == 36565) {
8297 part1[i],
"decay")) == from_to.second)) {
8298 result += part2[i] * 0.01;
8322 template<>
void pyne::_load_data<pyne::decay>() {
8336 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
decay));
8337 status = H5Tinsert(desc,
"parent", HOFFSET(
decay,
parent),
8339 status = H5Tinsert(desc,
"child", HOFFSET(
decay,
child),
8341 status = H5Tinsert(desc,
"decay", HOFFSET(
decay,
decay),
8345 status = H5Tinsert(desc,
"half_life_error", HOFFSET(
decay,
8346 half_life_error), H5T_NATIVE_DOUBLE);
8349 status = H5Tinsert(desc,
"branch_ratio_error", HOFFSET(
decay, branch_ratio_error),
8351 status = H5Tinsert(desc,
"photon_branch_ratio", HOFFSET(
decay,
8352 photon_branch_ratio), H5T_NATIVE_DOUBLE);
8353 status = H5Tinsert(desc,
"photon_branch_ratio_err", HOFFSET(
decay,
8354 photon_branch_ratio_error), H5T_NATIVE_DOUBLE);
8355 status = H5Tinsert(desc,
"beta_branch_ratio", HOFFSET(
decay,
8356 beta_branch_ratio), H5T_NATIVE_DOUBLE);
8357 status = H5Tinsert(desc,
"beta_branch_ratio_err", HOFFSET(
decay,
8358 beta_branch_ratio_error), H5T_NATIVE_DOUBLE);
8365 hid_t decay_set = H5Dopen2(nuc_data_h5,
"/decay/decays", H5P_DEFAULT);
8366 hid_t decay_space = H5Dget_space(decay_set);
8367 int decay_length = H5Sget_simple_extent_npoints(decay_space);
8370 decay * decay_array =
new decay[decay_length];
8371 status = H5Dread(decay_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
8375 status = H5Dclose(decay_set);
8376 status = H5Fclose(nuc_data_h5);
8378 for (
int i = 0; i < decay_length; ++i) {
8382 delete[] decay_array;
8387 std::vector<int> result = data_access<int, decay>(
parent,
8393 return std::make_pair(data_access<double, decay>(from_to, offsetof(
8399 std::vector<std::pair<double, double> > result;
8400 std::vector<double> part1 = data_access<double, decay>(
parent,
8402 std::vector<double> part2 = data_access<double, decay>(
parent,
8404 for(
int i = 0; i < part1.size(); ++i){
8405 result.push_back(std::make_pair(part1[i],part2[i]));
8411 return std::make_pair(data_access<double, decay>(from_to, offsetof(
decay,
8417 return data_access<double, decay>(
parent, offsetof(
decay,
8423 return std::make_pair(data_access<double, decay>(from_to,
8425 data_access<double, decay>(from_to, offsetof(
decay,
8431 std::vector<std::pair<double, double> > result;
8432 std::vector<double> part1 = data_access<double, decay>(
parent,
8434 std::vector<double> part2 = data_access<double, decay>(
parent,
8436 for(
int i = 0; i < part1.size(); ++i){
8437 result.push_back(std::make_pair(part1[i],part2[i]));
8444 return std::make_pair(data_access<double, decay>(from_to,
8446 data_access<double, decay>(from_to, offsetof(
decay,
8452 std::vector<std::pair<double, double> > result;
8453 std::vector<double> part1 = data_access<double, decay>(
parent,
8455 std::vector<double> part2 = data_access<double, decay>(
parent,
8457 for(
int i = 0; i < part1.size(); ++i){
8458 result.push_back(std::make_pair(part1[i],part2[i]));
8465 template<>
void pyne::_load_data<pyne::gamma>() {
8479 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
gamma));
8480 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
gamma, from_nuc),
8482 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
gamma, to_nuc),
8484 status = H5Tinsert(desc,
"parent_nuc", HOFFSET(
gamma, parent_nuc),
8486 status = H5Tinsert(desc,
"child_nuc", HOFFSET(
gamma, child_nuc),
8488 status = H5Tinsert(desc,
"energy", HOFFSET(
gamma, energy),
8490 status = H5Tinsert(desc,
"energy_err", HOFFSET(
gamma, energy_err),
8492 status = H5Tinsert(desc,
"photon_intensity", HOFFSET(
gamma,
8493 photon_intensity), H5T_NATIVE_DOUBLE);
8494 status = H5Tinsert(desc,
"photon_intensity_err", HOFFSET(
gamma,
8495 photon_intensity_err), H5T_NATIVE_DOUBLE);
8496 status = H5Tinsert(desc,
"conv_intensity", HOFFSET(
gamma,
8497 conv_intensity), H5T_NATIVE_DOUBLE);
8498 status = H5Tinsert(desc,
"conv_intensity_err", HOFFSET(
gamma,
8499 conv_intensity_err), H5T_NATIVE_DOUBLE);
8500 status = H5Tinsert(desc,
"total_intensity", HOFFSET(
gamma,
8501 total_intensity), H5T_NATIVE_DOUBLE);
8502 status = H5Tinsert(desc,
"total_intensity_err", HOFFSET(
gamma,
8503 total_intensity_err), H5T_NATIVE_DOUBLE);
8504 status = H5Tinsert(desc,
"k_conv_e", HOFFSET(
gamma, k_conv_e),
8506 status = H5Tinsert(desc,
"l_conv_e", HOFFSET(
gamma, l_conv_e),
8508 status = H5Tinsert(desc,
"m_conv_e", HOFFSET(
gamma, m_conv_e),
8517 hid_t gamma_set = H5Dopen2(nuc_data_h5,
"/decay/gammas", H5P_DEFAULT);
8518 hid_t gamma_space = H5Dget_space(gamma_set);
8519 int gamma_length = H5Sget_simple_extent_npoints(gamma_space);
8522 gamma * gamma_array =
new gamma[gamma_length];
8523 status = H5Dread(gamma_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
8527 status = H5Dclose(gamma_set);
8528 status = H5Fclose(nuc_data_h5);
8530 for (
int i = 0; i < gamma_length; ++i) {
8531 if ((gamma_array[i].parent_nuc != 0) && !isnan(gamma_array[i].energy))
8532 gamma_data[std::make_pair(gamma_array[i].parent_nuc,
8533 gamma_array[i].energy)] = gamma_array[i];
8535 delete[] gamma_array;
8539 std::vector<std::pair<double, double> > result;
8540 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
8542 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
8544 for(
int i = 0; i < part1.size(); ++i){
8545 result.push_back(std::make_pair(part1[i],part2[i]));
8552 std::vector<std::pair<double, double> > result;
8553 std::vector<double> part1 = data_access<double, gamma>(energy+error,
8555 std::vector<double> part2 = data_access<double, gamma>(energy+error,
8557 for(
int i = 0; i < part1.size(); ++i){
8558 result.push_back(std::make_pair(part1[i],part2[i]));
8565 std::vector<std::pair<double, double> > result;
8566 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
8568 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
8570 for(
int i = 0; i < part1.size(); ++i){
8571 result.push_back(std::make_pair(part1[i],part2[i]));
8577 double energy,
double error) {
8578 std::vector<std::pair<double, double> > result;
8579 std::vector<double> part1 = data_access<double, gamma>(energy+error,
8581 std::vector<double> part2 = data_access<double, gamma>(energy+error,
8583 for(
int i = 0; i < part1.size(); ++i){
8584 result.push_back(std::make_pair(part1[i],part2[i]));
8591 std::vector<std::pair<double, double> > result;
8592 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
8594 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
8596 for(
int i = 0; i < part1.size(); ++i){
8597 result.push_back(std::make_pair(part1[i],part2[i]));
8604 std::vector<std::pair<double, double> > result;
8605 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
8607 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
8609 for(
int i = 0; i < part1.size(); ++i){
8610 result.push_back(std::make_pair(part1[i],part2[i]));
8616 std::vector<std::pair<int, int> > result;
8617 std::vector<int> part1 = data_access<int, gamma>(
parent, 0.0, DBL_MAX,
8619 std::vector<int> part2 = data_access<int, gamma>(
parent, 0.0, DBL_MAX,
8621 for(
int i = 0; i < part1.size(); ++i){
8622 result.push_back(std::make_pair(part1[i],part2[i]));
8629 std::vector<std::pair<int, int> > result;
8630 std::vector<int> part1 = data_access<int, gamma>(energy+error,
8632 std::vector<int> part2 = data_access<int, gamma>(energy+error,
8634 for(
int i = 0; i < part1.size(); ++i){
8635 result.push_back(std::make_pair(part1[i],part2[i]));
8643 std::vector<std::pair<int, int> > result;
8644 std::vector<int> part1 = data_access<int, gamma>(energy+error,
8646 std::vector<int> part2 = data_access<int, gamma>(energy+error,
8648 for(
int i = 0; i < part1.size(); ++i){
8649 result.push_back(std::make_pair(part1[i],part2[i]));
8655 return data_access<int, gamma>(energy+error, energy-error,
8660 return data_access<int, gamma>(energy+error, energy-error,
8665 return data_access<int, gamma>(
parent, 0.0, DBL_MAX,
8670 std::vector<std::pair<double, double> > result;
8671 std::vector<std::pair<double, double> > temp;
8672 std::vector<double> k_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
8674 std::vector<double> l_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
8676 std::vector<int> children = data_access<int, gamma>(
parent, 0.0,
8679 std::vector<std::pair<double, double> >
decay_br =
8681 for(
int i = 0; i < k_list.size(); ++i){
8682 for (
int j = 0; j < decay_children.size(); ++j) {
8685 k_list[i]*decay_br[j].first, l_list[i]*decay_br[j].first);
8686 for (
int k = 0; k < temp.size(); ++k) {
8687 if (!isnan(temp[k].second) && !isnan(temp[k].first)) {
8689 for (
int l = 0; l < result.size(); ++l) {
8690 if (temp[k].first == result[l].first) {
8691 result[l].second = result[l].second + temp[k].second;
8697 result.push_back(temp[k]);
8710 template<>
void pyne::_load_data<pyne::alpha>() {
8724 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
alpha));
8725 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
alpha, from_nuc),
8727 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
alpha, to_nuc),
8729 status = H5Tinsert(desc,
"energy", HOFFSET(
alpha, energy),
8731 status = H5Tinsert(desc,
"intensity", HOFFSET(
alpha, intensity),
8740 hid_t alpha_set = H5Dopen2(nuc_data_h5,
"/decay/alphas", H5P_DEFAULT);
8741 hid_t alpha_space = H5Dget_space(alpha_set);
8742 int alpha_length = H5Sget_simple_extent_npoints(alpha_space);
8745 alpha * alpha_array =
new alpha[alpha_length];
8746 status = H5Dread(alpha_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
8750 status = H5Dclose(alpha_set);
8751 status = H5Fclose(nuc_data_h5);
8753 for (
int i = 0; i < alpha_length; ++i) {
8754 if ((alpha_array[i].from_nuc != 0) && !isnan(alpha_array[i].energy))
8755 alpha_data[std::make_pair(alpha_array[i].from_nuc, alpha_array[i].energy)]
8758 delete[] alpha_array;
8762 return data_access<double, alpha>(
parent, 0.0, DBL_MAX,
8766 return data_access<double, alpha>(
parent, 0.0, DBL_MAX,
8771 return data_access<int, alpha>(energy+error, energy-error,
8776 return data_access<int, alpha>(energy+error, energy-error,
8781 return data_access<int, alpha>(
parent, 0.0, DBL_MAX,
8787 template<>
void pyne::_load_data<pyne::beta>() {
8801 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
beta));
8802 status = H5Tinsert(desc,
"endpoint_energy", HOFFSET(
beta,
8803 endpoint_energy), H5T_NATIVE_DOUBLE);
8804 status = H5Tinsert(desc,
"avg_energy", HOFFSET(
beta, avg_energy),
8806 status = H5Tinsert(desc,
"intensity", HOFFSET(
beta, intensity),
8808 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
beta, from_nuc),
8810 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
beta, to_nuc),
8819 hid_t beta_set = H5Dopen2(nuc_data_h5,
"/decay/betas", H5P_DEFAULT);
8820 hid_t beta_space = H5Dget_space(beta_set);
8821 int beta_length = H5Sget_simple_extent_npoints(beta_space);
8824 beta * beta_array =
new beta[beta_length];
8825 status = H5Dread(beta_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, beta_array);
8828 status = H5Dclose(beta_set);
8829 status = H5Fclose(nuc_data_h5);
8831 for (
int i = 0; i < beta_length; ++i) {
8832 if ((beta_array[i].from_nuc != 0) && !isnan(beta_array[i].avg_energy))
8833 beta_data[std::make_pair(beta_array[i].from_nuc, beta_array[i].avg_energy)]
8836 delete[] beta_array;
8840 return data_access<double, beta>(
parent, 0.0, DBL_MAX,
8845 return data_access<double, beta>(
parent, 0.0, DBL_MAX,
8850 return data_access<double, beta>(
parent, 0.0, DBL_MAX,
8855 return data_access<int, beta>(energy+error, energy-error,
8860 return data_access<int, beta>(energy+error, energy-error,
8865 return data_access<int, beta>(
parent, 0.0, DBL_MAX,
8872 template<>
void pyne::_load_data<pyne::ecbp>() {
8886 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
ecbp));
8887 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
ecbp, from_nuc),
8889 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
ecbp, to_nuc),
8891 status = H5Tinsert(desc,
"endpoint_energy", HOFFSET(
ecbp,
8892 endpoint_energy),H5T_NATIVE_DOUBLE);
8893 status = H5Tinsert(desc,
"avg_energy", HOFFSET(
ecbp, avg_energy),
8895 status = H5Tinsert(desc,
"beta_plus_intensity", HOFFSET(
ecbp,
8896 beta_plus_intensity), H5T_NATIVE_DOUBLE);
8899 status = H5Tinsert(desc,
"k_conv_e", HOFFSET(
ecbp, k_conv_e),
8901 status = H5Tinsert(desc,
"l_conv_e", HOFFSET(
ecbp, l_conv_e),
8903 status = H5Tinsert(desc,
"m_conv_e", HOFFSET(
ecbp, m_conv_e),
8911 hid_t ecbp_set = H5Dopen2(nuc_data_h5,
"/decay/ecbp", H5P_DEFAULT);
8912 hid_t ecbp_space = H5Dget_space(ecbp_set);
8913 int ecbp_length = H5Sget_simple_extent_npoints(ecbp_space);
8916 ecbp * ecbp_array =
new ecbp[ecbp_length];
8917 status = H5Dread(ecbp_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, ecbp_array);
8920 status = H5Dclose(ecbp_set);
8921 status = H5Fclose(nuc_data_h5);
8923 for (
int i = 0; i < ecbp_length; ++i) {
8924 if ((ecbp_array[i].from_nuc != 0) && !isnan(ecbp_array[i].avg_energy))
8925 ecbp_data[std::make_pair(ecbp_array[i].from_nuc, ecbp_array[i].avg_energy)]
8928 delete[] ecbp_array;
8932 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
8937 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
8942 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
8947 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
8952 return data_access<int, ecbp>(energy+error, energy-error,
8957 return data_access<int, ecbp>(energy+error, energy-error,
8962 return data_access<int, ecbp>(
parent, 0.0, DBL_MAX,
8967 std::vector<std::pair<double, double> > result;
8968 std::vector<std::pair<double, double> > temp;
8969 std::vector<double> k_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
8971 std::vector<double> l_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
8973 std::vector<int> children = data_access<int, ecbp>(
parent, 0.0, DBL_MAX,
8976 std::vector<std::pair<double, double> >
decay_br =
8978 for(
int i = 0; i < k_list.size(); ++i){
8979 for (
int j = 0; j < decay_children.size(); ++j) {
8982 k_list[i]*decay_br[j].first, l_list[i]*decay_br[j].first);
8983 for (
int k = 0; k < temp.size(); ++k) {
8984 if (!isnan(temp[k].second) && !isnan(temp[k].first)) {
8986 for (
int l = 0; l < result.size(); ++l) {
8987 if (temp[k].first == result[l].first) {
8988 result[l].second = result[l].second + temp[k].second;
8994 result.push_back(temp[k]);
9009 std::vector<std::pair<double, double> >
pyne::gammas(
int parent_state_id) {
9010 std::vector<std::pair<double, double> > result;
9012 std::vector<std::pair<double, double> > energies =
gamma_energy(parent_state_id);
9013 std::vector<std::pair<double, double> > intensities =
9015 std::vector<std::pair<int, int> > children =
gamma_from_to(parent_state_id);
9017 std::vector<std::pair<double, double> >
decay_br =
9019 for (
int i = 0; i < children.size(); ++i) {
9020 for (
int j = 0; j < decay_children.size(); ++j) {
9022 result.push_back(std::make_pair(energies[i].first,
9023 decay_c*intensities[i].first*decay_br[j].first));
9030 std::vector<std::pair<double, double> >
pyne::alphas(
int parent_state_id) {
9031 std::vector<std::pair<double, double> > result;
9033 std::vector<double> energies =
alpha_energy(parent_state_id);
9035 std::vector<int> children =
alpha_child(parent_state_id);
9038 for (
int i = 0; i < children.size(); ++i) {
9039 for (
int j = 0; j < decay_children.size(); ++j) {
9041 result.push_back(std::make_pair(energies[i],
9042 decay_c*decay_br[j]*intensities[i]));
9049 std::vector<std::pair<double, double> >
pyne::betas(
int parent_state_id) {
9050 std::vector<std::pair<double, double> > result;
9053 std::vector<double> intensities =
beta_intensity(parent_state_id);
9054 std::vector<int> children =
beta_child(parent_state_id);
9056 std::vector<std::pair<double, double> >
decay_br =
9058 for (
int i = 0; i < children.size(); ++i) {
9059 for (
int j = 0; j < decay_children.size(); ++j) {
9061 result.push_back(std::make_pair(energies[i],
9062 decay_c*decay_br[j].first*intensities[i]));
9072 std::vector<std::pair<double, double> > result;
9073 std::vector<std::pair<double, double> > temp;
9074 std::vector<double> k_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
9076 std::vector<double> l_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
9078 std::vector<int> children = data_access<int, ecbp>(
parent, 0.0, DBL_MAX,
9081 std::vector<std::pair<double, double> >
decay_br =
9083 for(
int i = 0; i < k_list.size(); ++i){
9084 for (
int j = 0; j < decay_children.size(); ++j) {
9087 k_list[i]*decay_br[j].first, l_list[i]*decay_br[j].first);
9088 for (
int k = 0; k < temp.size(); ++k) {
9089 if (!isnan(temp[k].second) && !isnan(temp[k].first)) {
9091 for (
int l = 0; l < result.size(); ++l) {
9092 if (temp[k].first == result[l].first) {
9093 result[l].second = result[l].second + temp[k].second;
9099 result.push_back(temp[k]);
9107 std::vector<double> gk_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
9109 std::vector<double> gl_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
9111 std::vector<int> gchildren = data_access<int, gamma>(
parent, 0.0,
9113 std::vector<std::pair<double, double> > decay_nrbr =
9115 for(
int i = 0; i < gk_list.size(); ++i){
9116 for (
int j = 0; j < decay_children.size(); ++j) {
9119 gk_list[i]*decay_nrbr[j].first, gl_list[i]*decay_nrbr[j].first);
9120 for (
int k = 0; k < temp.size(); ++k) {
9121 if (!isnan(temp[k].second) && !isnan(temp[k].first)) {
9123 for (
int l = 0; l < result.size(); ++l) {
9124 if (temp[k].first == result[l].first) {
9125 result[l].second = result[l].second + temp[k].second;
9131 result.push_back(temp[k]);
9140 for(
int i = 0; i < result.size(); ++i)
9141 result[i].second = result[i].second * decay_c;
9181 std::map<unsigned int, size_t> rxns;
9187 rxns[
id(
"gamma")] = offsetof(
simple_xs, sigma_gamma);
9189 rxns[
id(
"alpha")] = offsetof(
simple_xs, sigma_alpha);
9190 rxns[
id(
"proton")] = offsetof(
simple_xs, sigma_proton);
9191 rxns[
id(
"deut")] = offsetof(
simple_xs, sigma_deut);
9192 rxns[
id(
"trit")] = offsetof(
simple_xs, sigma_trit);
9198 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
simple_xs));
9199 H5Tinsert(desc,
"nuc", HOFFSET(
simple_xs, nuc), H5T_NATIVE_INT);
9200 H5Tinsert(desc,
"sigma_t", HOFFSET(
simple_xs, sigma_t), H5T_NATIVE_DOUBLE);
9201 H5Tinsert(desc,
"sigma_s", HOFFSET(
simple_xs, sigma_s), H5T_NATIVE_DOUBLE);
9202 H5Tinsert(desc,
"sigma_e", HOFFSET(
simple_xs, sigma_e), H5T_NATIVE_DOUBLE);
9203 H5Tinsert(desc,
"sigma_i", HOFFSET(
simple_xs, sigma_i), H5T_NATIVE_DOUBLE);
9204 H5Tinsert(desc,
"sigma_a", HOFFSET(
simple_xs, sigma_a), H5T_NATIVE_DOUBLE);
9205 H5Tinsert(desc,
"sigma_gamma", HOFFSET(
simple_xs, sigma_gamma), H5T_NATIVE_DOUBLE);
9206 H5Tinsert(desc,
"sigma_f", HOFFSET(
simple_xs, sigma_f), H5T_NATIVE_DOUBLE);
9207 H5Tinsert(desc,
"sigma_alpha", HOFFSET(
simple_xs, sigma_alpha), H5T_NATIVE_DOUBLE);
9208 H5Tinsert(desc,
"sigma_proton", HOFFSET(
simple_xs, sigma_proton), H5T_NATIVE_DOUBLE);
9209 H5Tinsert(desc,
"sigma_deut", HOFFSET(
simple_xs, sigma_deut), H5T_NATIVE_DOUBLE);
9210 H5Tinsert(desc,
"sigma_trit", HOFFSET(
simple_xs, sigma_trit), H5T_NATIVE_DOUBLE);
9211 H5Tinsert(desc,
"sigma_2n", HOFFSET(
simple_xs, sigma_2n), H5T_NATIVE_DOUBLE);
9212 H5Tinsert(desc,
"sigma_3n", HOFFSET(
simple_xs, sigma_3n), H5T_NATIVE_DOUBLE);
9213 H5Tinsert(desc,
"sigma_4n", HOFFSET(
simple_xs, sigma_4n), H5T_NATIVE_DOUBLE);
9219 std::string path =
"/neutron/simple_xs/" + energy;
9222 hid_t simple_xs_set = H5Dopen2(nuc_data_h5, path.c_str(), H5P_DEFAULT);
9223 hid_t simple_xs_space = H5Dget_space(simple_xs_set);
9224 int n = H5Sget_simple_extent_npoints(simple_xs_space);
9228 H5Dread(simple_xs_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, array);
9231 H5Dclose(simple_xs_set);
9232 H5Fclose(nuc_data_h5);
9235 for(
int i = 0; i < n; i++) {
9236 std::map<unsigned int, size_t>::iterator it;
9237 for (it = rxns.begin(); it != rxns.end(); ++it) {
9238 double xs = *(
double*)((
char*)&array[i] + it->second);
9246 std::set<std::string> energies;
9247 energies.insert(
"thermal");
9248 energies.insert(
"thermal_maxwell_ave");
9249 energies.insert(
"resonance_integral");
9250 energies.insert(
"fourteen_MeV");
9251 energies.insert(
"fission_spectrum_ave");
9253 if (energies.count(energy) == 0) {
9255 "' is not a valid simple_xs group");
9262 " is not a valid simple_xs nuclide");
9265 " is not a valid simple_xs reaction");
9362 #ifdef PYNE_IS_AMALGAMATED
9363 #if !defined(JSON_IS_AMALGAMATION)
9364 #define JSON_IS_AMALGAMATION
9380 #ifndef LIB_JSONCPP_JSON_TOOL_H_INCLUDED
9381 # define LIB_JSONCPP_JSON_TOOL_H_INCLUDED
9392 static inline std::string
9400 result[0] =
static_cast<char>(cp);
9401 }
else if (cp <= 0x7FF) {
9403 result[1] =
static_cast<char>(0x80 | (0x3f & cp));
9404 result[0] =
static_cast<char>(0xC0 | (0x1f & (cp >> 6)));
9405 }
else if (cp <= 0xFFFF) {
9407 result[2] =
static_cast<char>(0x80 | (0x3f & cp));
9408 result[1] = 0x80 |
static_cast<char>((0x3f & (cp >> 6)));
9409 result[0] = 0xE0 |
static_cast<char>((0xf & (cp >> 12)));
9410 }
else if (cp <= 0x10FFFF) {
9412 result[3] =
static_cast<char>(0x80 | (0x3f & cp));
9413 result[2] =
static_cast<char>(0x80 | (0x3f & (cp >> 6)));
9414 result[1] =
static_cast<char>(0x80 | (0x3f & (cp >> 12)));
9415 result[0] =
static_cast<char>(0xF0 | (0x7 & (cp >> 18)));
9425 return ch > 0 && ch <= 0x1F;
9448 *--current = char(value % 10) +
'0';
9451 while ( value != 0 );
9456 #endif // LIB_JSONCPP_JSON_TOOL_H_INCLUDED
9476 #if !defined(JSON_IS_AMALGAMATION)
9477 # include <json/reader.h>
9478 # include <json/value.h>
9479 # include "json_tool.h"
9480 #endif // if !defined(JSON_IS_AMALGAMATION)
9486 #include <stdexcept>
9488 #if _MSC_VER >= 1400 // VC++ 8.0
9489 #pragma warning( disable : 4996 ) // disable warning about strdup being deprecated.
9497 Features::Features()
9498 : allowComments_( true )
9499 , strictRoot_( false ) {
9523 return c == c1 || c == c2 || c == c3 || c == c4;
9528 return c == c1 || c == c2 || c == c3 || c == c4 || c == c5;
9535 for ( ;begin < end; ++begin )
9536 if ( *begin ==
'\n' || *begin ==
'\r' )
9551 : features_( features ) {
9558 bool collectComments ) {
9559 document_ = document;
9560 const char *begin = document_.c_str();
9561 const char *end = begin + document_.length();
9562 return parse( begin, end, root, collectComments );
9569 bool collectComments ) {
9578 std::getline(sin, doc, (
char)EOF);
9579 return parse( doc, root, collectComments );
9585 bool collectComments ) {
9587 collectComments =
false;
9592 collectComments_ = collectComments;
9596 commentsBefore_ =
"";
9598 while ( !nodes_.empty() )
9600 nodes_.push( &root );
9602 bool successful = readValue();
9604 skipCommentTokens( token );
9605 if ( collectComments_ && !commentsBefore_.empty() )
9610 token.type_ = tokenError;
9611 token.start_ = beginDoc;
9612 token.end_ = endDoc;
9613 addError(
"A valid JSON document must be either an array or an object value.",
9623 Reader::readValue() {
9625 skipCommentTokens( token );
9626 bool successful =
true;
9628 if ( collectComments_ && !commentsBefore_.empty() ) {
9630 commentsBefore_ =
"";
9634 switch ( token.type_ ) {
9635 case tokenObjectBegin:
9636 successful = readObject( token );
9638 case tokenArrayBegin:
9639 successful = readArray( token );
9642 successful = decodeNumber( token );
9645 successful = decodeString( token );
9648 currentValue() =
true;
9651 currentValue() =
false;
9654 currentValue() = Value();
9657 return addError(
"Syntax error: value, object or array expected.", token );
9660 if ( collectComments_ ) {
9661 lastValueEnd_ = current_;
9662 lastValue_ = ¤tValue();
9670 Reader::skipCommentTokens( Token &token ) {
9675 while ( token.type_ == tokenComment );
9683 Reader::expectToken( TokenType type, Token &token,
const char *message ) {
9685 if ( token.type_ != type )
9686 return addError( message, token );
9692 Reader::readToken( Token &token ) {
9694 token.start_ = current_;
9695 Char c = getNextChar();
9699 token.type_ = tokenObjectBegin;
9702 token.type_ = tokenObjectEnd;
9705 token.type_ = tokenArrayBegin;
9708 token.type_ = tokenArrayEnd;
9711 token.type_ = tokenString;
9715 token.type_ = tokenComment;
9729 token.type_ = tokenNumber;
9733 token.type_ = tokenTrue;
9734 ok = match(
"rue", 3 );
9737 token.type_ = tokenFalse;
9738 ok = match(
"alse", 4 );
9741 token.type_ = tokenNull;
9742 ok = match(
"ull", 3 );
9745 token.type_ = tokenArraySeparator;
9748 token.type_ = tokenMemberSeparator;
9751 token.type_ = tokenEndOfStream;
9758 token.type_ = tokenError;
9759 token.end_ = current_;
9765 Reader::skipSpaces() {
9766 while ( current_ != end_ ) {
9768 if ( c ==
' ' || c ==
'\t' || c ==
'\r' || c ==
'\n' )
9777 Reader::match( Location pattern,
9778 int patternLength ) {
9779 if ( end_ - current_ < patternLength )
9781 int index = patternLength;
9783 if ( current_[index] != pattern[index] )
9785 current_ += patternLength;
9791 Reader::readComment() {
9792 Location commentBegin = current_ - 1;
9793 Char c = getNextChar();
9794 bool successful =
false;
9796 successful = readCStyleComment();
9797 else if ( c ==
'/' )
9798 successful = readCppStyleComment();
9802 if ( collectComments_ ) {
9804 if ( lastValueEnd_ && !
containsNewLine( lastValueEnd_, commentBegin ) )
9810 addComment( commentBegin, current_, placement );
9817 Reader::addComment( Location begin,
9820 assert( collectComments_ );
9823 assert( lastValue_ != 0 );
9824 lastValue_->
setComment( std::string( begin, end ), placement );
9826 if ( !commentsBefore_.empty() )
9827 commentsBefore_ +=
"\n";
9828 commentsBefore_ += std::string( begin, end );
9834 Reader::readCStyleComment() {
9835 while ( current_ != end_ ) {
9836 Char c = getNextChar();
9837 if ( c ==
'*' && *current_ ==
'/' )
9840 return getNextChar() ==
'/';
9845 Reader::readCppStyleComment() {
9846 while ( current_ != end_ ) {
9847 Char c = getNextChar();
9848 if ( c ==
'\r' || c ==
'\n' )
9856 Reader::readNumber() {
9857 while ( current_ != end_ ) {
9858 if ( !(*current_ >=
'0' && *current_ <=
'9') &&
9859 !
in( *current_,
'.',
'e',
'E',
'+',
'-' ) )
9866 Reader::readString() {
9868 while ( current_ != end_ ) {
9872 else if ( c ==
'"' )
9880 Reader::readObject( Token & ) {
9884 while ( readToken( tokenName ) ) {
9885 bool initialTokenOk =
true;
9886 while ( tokenName.type_ == tokenComment && initialTokenOk )
9887 initialTokenOk = readToken( tokenName );
9888 if ( !initialTokenOk )
9890 if ( tokenName.type_ == tokenObjectEnd && name.empty() )
9892 if ( tokenName.type_ != tokenString )
9896 if ( !decodeString( tokenName, name ) )
9897 return recoverFromError( tokenObjectEnd );
9900 if ( !readToken( colon ) || colon.type_ != tokenMemberSeparator ) {
9901 return addErrorAndRecover(
"Missing ':' after object member name",
9905 Value &value = currentValue()[
name ];
9906 nodes_.push( &value );
9907 bool ok = readValue();
9910 return recoverFromError( tokenObjectEnd );
9913 if ( !readToken( comma )
9914 || ( comma.type_ != tokenObjectEnd &&
9915 comma.type_ != tokenArraySeparator &&
9916 comma.type_ != tokenComment ) ) {
9917 return addErrorAndRecover(
"Missing ',' or '}' in object declaration",
9921 bool finalizeTokenOk =
true;
9922 while ( comma.type_ == tokenComment &&
9924 finalizeTokenOk = readToken( comma );
9925 if ( comma.type_ == tokenObjectEnd )
9928 return addErrorAndRecover(
"Missing '}' or object member name",
9935 Reader::readArray( Token & ) {
9938 if ( *current_ ==
']' ) {
9940 readToken( endArray );
9945 Value &value = currentValue()[ index++ ];
9946 nodes_.push( &value );
9947 bool ok = readValue();
9950 return recoverFromError( tokenArrayEnd );
9954 ok = readToken( token );
9955 while ( token.type_ == tokenComment && ok ) {
9956 ok = readToken( token );
9958 bool badTokenType = ( token.type_ != tokenArraySeparator &&
9959 token.type_ != tokenArrayEnd );
9960 if ( !ok || badTokenType ) {
9961 return addErrorAndRecover(
"Missing ',' or ']' in array declaration",
9965 if ( token.type_ == tokenArrayEnd )
9973 Reader::decodeNumber( Token &token ) {
9974 bool isDouble =
false;
9975 for (
Location inspect = token.start_; inspect != token.end_; ++inspect )
9978 ||
in( *inspect,
'.',
'e',
'E',
'+' )
9979 || ( *inspect ==
'-' && inspect != token.start_ );
9982 return decodeDouble( token );
9987 bool isNegative = *current ==
'-';
9991 : Value::maxLargestUInt;
9992 Value::LargestUInt threshold = maxIntegerValue / 10;
9994 assert( lastDigitThreshold >=0 && lastDigitThreshold <= 9 );
9995 Value::LargestUInt value = 0;
9996 while ( current < token.end_ ) {
9997 Char c = *current++;
9998 if ( c < '0' || c >
'9' )
9999 return addError(
"'" + std::string( token.start_, token.end_ ) +
"' is not a number.", token );
10001 if ( value >= threshold ) {
10005 if ( current != token.end_ || digit > lastDigitThreshold ) {
10006 return decodeDouble( token );
10009 value = value * 10 + digit;
10016 currentValue() = value;
10022 Reader::decodeDouble( Token &token ) {
10024 const int bufferSize = 32;
10026 int length = int(token.end_ - token.start_);
10027 if ( length <= bufferSize ) {
10028 Char buffer[bufferSize+1];
10029 memcpy( buffer, token.start_, length );
10030 buffer[length] = 0;
10031 count = sscanf( buffer,
"%lf", &value );
10033 std::string buffer( token.start_, token.end_ );
10034 count = sscanf( buffer.c_str(),
"%lf", &value );
10038 return addError(
"'" + std::string( token.start_, token.end_ ) +
"' is not a number.", token );
10039 currentValue() = value;
10045 Reader::decodeString( Token &token ) {
10046 std::string decoded;
10047 if ( !decodeString( token, decoded ) )
10049 currentValue() = decoded;
10055 Reader::decodeString( Token &token, std::string &decoded ) {
10056 decoded.reserve( token.end_ - token.start_ - 2 );
10057 Location current = token.start_ + 1;
10059 while ( current != end ) {
10060 Char c = *current++;
10063 else if ( c ==
'\\' ) {
10064 if ( current == end )
10065 return addError(
"Empty escape sequence in string", token, current );
10066 Char escape = *current++;
10067 switch ( escape ) {
10068 case '"': decoded +=
'"';
break;
10069 case '/': decoded +=
'/';
break;
10070 case '\\': decoded +=
'\\';
break;
10071 case 'b': decoded +=
'\b';
break;
10072 case 'f': decoded +=
'\f';
break;
10073 case 'n': decoded +=
'\n';
break;
10074 case 'r': decoded +=
'\r';
break;
10075 case 't': decoded +=
'\t';
break;
10077 unsigned int unicode;
10078 if ( !decodeUnicodeCodePoint( token, current, end, unicode ) )
10084 return addError(
"Bad escape sequence in string", token, current );
10095 Reader::decodeUnicodeCodePoint( Token &token,
10098 unsigned int &unicode ) {
10100 if ( !decodeUnicodeEscapeSequence( token, current, end, unicode ) )
10102 if (unicode >= 0xD800 && unicode <= 0xDBFF) {
10104 if (end - current < 6)
10105 return addError(
"additional six characters expected to parse unicode surrogate pair.", token, current );
10106 unsigned int surrogatePair;
10107 if (*(current++) ==
'\\' && *(current++)==
'u') {
10108 if (decodeUnicodeEscapeSequence( token, current, end, surrogatePair )) {
10109 unicode = 0x10000 + ((unicode & 0x3FF) << 10) + (surrogatePair & 0x3FF);
10113 return addError(
"expecting another \\u token to begin the second half of a unicode surrogate pair", token, current );
10119 Reader::decodeUnicodeEscapeSequence( Token &token,
10122 unsigned int &unicode ) {
10123 if ( end - current < 4 )
10124 return addError(
"Bad unicode escape sequence in string: four digits expected.", token, current );
10126 for (
int index =0; index < 4; ++index ) {
10127 Char c = *current++;
10129 if ( c >=
'0' && c <=
'9' )
10130 unicode += c -
'0';
10131 else if ( c >=
'a' && c <=
'f' )
10132 unicode += c -
'a' + 10;
10133 else if ( c >=
'A' && c <=
'F' )
10134 unicode += c -
'A' + 10;
10136 return addError(
"Bad unicode escape sequence in string: hexadecimal digit expected.", token, current );
10143 Reader::addError(
const std::string &message,
10147 info.token_ = token;
10148 info.message_ = message;
10149 info.extra_ = extra;
10150 errors_.push_back( info );
10156 Reader::recoverFromError( TokenType skipUntilToken ) {
10157 int errorCount = int(errors_.size());
10160 if ( !readToken(skip) )
10161 errors_.resize( errorCount );
10162 if ( skip.type_ == skipUntilToken || skip.type_ == tokenEndOfStream )
10165 errors_.resize( errorCount );
10171 Reader::addErrorAndRecover(
const std::string &message,
10173 TokenType skipUntilToken ) {
10174 addError( message, token );
10175 return recoverFromError( skipUntilToken );
10180 Reader::currentValue() {
10181 return *(nodes_.top());
10186 Reader::getNextChar() {
10187 if ( current_ == end_ )
10189 return *current_++;
10194 Reader::getLocationLineAndColumn( Location location,
10196 int &column )
const {
10200 while ( current < location && current != end_ ) {
10201 Char c = *current++;
10203 if ( *current ==
'\n' )
10205 lastLineStart = current;
10207 }
else if ( c ==
'\n' ) {
10208 lastLineStart = current;
10213 column = int(location - lastLineStart) + 1;
10219 Reader::getLocationLineAndColumn( Location location )
const {
10221 getLocationLineAndColumn( location, line, column );
10222 char buffer[18+16+16+1];
10223 sprintf( buffer,
"Line %d, Column %d", line, column );
10237 std::string formattedMessage;
10238 for ( Errors::const_iterator itError = errors_.begin();
10239 itError != errors_.end();
10241 const ErrorInfo &error = *itError;
10242 formattedMessage +=
"* " + getLocationLineAndColumn( error.token_.start_ ) +
"\n";
10243 formattedMessage +=
" " + error.message_ +
"\n";
10244 if ( error.extra_ )
10245 formattedMessage +=
"See " + getLocationLineAndColumn( error.extra_ ) +
" for detail.\n";
10247 return formattedMessage;
10253 bool ok = reader.
parse(sin, root,
true);
10280 #ifndef JSONCPP_BATCHALLOCATOR_H_INCLUDED
10281 # define JSONCPP_BATCHALLOCATOR_H_INCLUDED
10283 # include <stdlib.h>
10284 # include <assert.h>
10286 # ifndef JSONCPP_DOC_EXCLUDE_IMPLEMENTATION
10302 template<
typename AllocatedType
10303 ,
const unsigned int objectPerAllocation>
10310 , objectsPerPage_( objectsPerPage ) {
10312 assert(
sizeof(AllocatedType) * objectPerAllocation >=
sizeof(AllocatedType *) );
10313 assert( objectsPerPage >= 16 );
10314 batches_ = allocateBatch( 0 );
10315 currentBatch_ = batches_;
10319 for ( BatchInfo *batch = batches_; batch; ) {
10320 BatchInfo *nextBatch = batch->next_;
10330 AllocatedType *
object = freeHead_;
10331 freeHead_ = *(AllocatedType **)
object;
10334 if ( currentBatch_->used_ == currentBatch_->end_ ) {
10335 currentBatch_ = currentBatch_->next_;
10336 while ( currentBatch_ && currentBatch_->used_ == currentBatch_->end_ )
10337 currentBatch_ = currentBatch_->next_;
10339 if ( !currentBatch_ ) {
10340 currentBatch_ = allocateBatch( objectsPerPage_ );
10341 currentBatch_->next_ = batches_;
10342 batches_ = currentBatch_;
10345 AllocatedType *allocated = currentBatch_->used_;
10346 currentBatch_->used_ += objectPerAllocation;
10353 assert(
object != 0 );
10354 *(AllocatedType **)
object = freeHead_;
10355 freeHead_ = object;
10361 AllocatedType *used_;
10362 AllocatedType *end_;
10363 AllocatedType buffer_[objectPerAllocation];
10370 static BatchInfo *allocateBatch(
unsigned int objectsPerPage ) {
10371 const unsigned int mallocSize =
sizeof(BatchInfo) -
sizeof(AllocatedType)* objectPerAllocation
10372 +
sizeof(AllocatedType) * objectPerAllocation * objectsPerPage;
10373 BatchInfo *batch =
static_cast<BatchInfo*
>( malloc( mallocSize ) );
10375 batch->used_ = batch->buffer_;
10376 batch->end_ = batch->buffer_ + objectsPerPage;
10380 BatchInfo *batches_;
10381 BatchInfo *currentBatch_;
10383 AllocatedType *freeHead_;
10384 unsigned int objectsPerPage_;
10390 # endif // ifndef JSONCPP_DOC_INCLUDE_IMPLEMENTATION
10392 #endif // JSONCPP_BATCHALLOCATOR_H_INCLUDED
10426 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10428 , isNull_(
true ) {
10432 , isNull_(
true ) {
10433 iterator_.array_ = ValueInternalArray::IteratorState();
10438 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10440 : current_( current )
10441 , isNull_( false ) {
10445 : isArray_( true ) {
10446 iterator_.array_ = state;
10451 : isArray_( false ) {
10452 iterator_.map_ = state;
10458 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10459 return current_->second;
10462 return ValueInternalArray::dereference( iterator_.array_ );
10463 return ValueInternalMap::value( iterator_.map_ );
10470 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10474 ValueInternalArray::increment( iterator_.array_ );
10475 ValueInternalMap::increment( iterator_.map_ );
10482 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10486 ValueInternalArray::decrement( iterator_.array_ );
10487 ValueInternalMap::decrement( iterator_.map_ );
10494 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10495 # ifdef JSON_USE_CPPTL_SMALLMAP
10496 return current_ - other.current_;
10503 if ( isNull_ && other.isNull_ ) {
10513 for ( Value::ObjectValues::iterator it = current_; it != other.current_; ++it ) {
10520 return ValueInternalArray::distance( iterator_.array_, other.iterator_.array_ );
10521 return ValueInternalMap::distance( iterator_.map_, other.iterator_.map_ );
10528 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10530 return other.isNull_;
10532 return current_ == other.current_;
10535 return ValueInternalArray::equals( iterator_.array_, other.iterator_.array_ );
10536 return ValueInternalMap::equals( iterator_.map_, other.iterator_.map_ );
10543 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10544 current_ = other.current_;
10547 iterator_.array_ = other.iterator_.array_;
10548 iterator_.map_ = other.iterator_.map_;
10555 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10556 const Value::CZString czstring = (*current_).first;
10557 if ( czstring.c_str() ) {
10558 if ( czstring.isStaticString() )
10560 return Value( czstring.c_str() );
10562 return Value( czstring.index() );
10565 return Value( ValueInternalArray::indexOf( iterator_.array_ ) );
10567 const char *
memberName = ValueInternalMap::key( iterator_.map_, isStatic );
10570 return Value( memberName );
10577 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10578 const Value::CZString czstring = (*current_).first;
10579 if ( !czstring.c_str() )
10580 return czstring.index();
10584 return Value::UInt( ValueInternalArray::indexOf( iterator_.array_ ) );
10592 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10593 const char *name = (*current_).first.c_str();
10594 return name ? name :
"";
10597 return ValueInternalMap::key( iterator_.map_ );
10615 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10621 : ValueIteratorBase( state ) {
10625 : ValueIteratorBase( state ) {
10629 ValueConstIterator &
10648 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10654 : ValueIteratorBase( state ) {
10658 : ValueIteratorBase( state ) {
10696 #if !defined(JSON_IS_AMALGAMATION)
10697 # include <json/value.h>
10698 # include <json/writer.h>
10699 # ifndef JSON_USE_SIMPLE_INTERNAL_ALLOCATOR
10700 # include "json_batchallocator.h"
10701 # endif // #ifndef JSON_USE_SIMPLE_INTERNAL_ALLOCATOR
10702 #endif // if !defined(JSON_IS_AMALGAMATION)
10703 #include <iostream>
10705 #include <stdexcept>
10708 #ifdef JSON_USE_CPPTL
10709 # include <cpptl/conststring.h>
10713 #define JSON_ASSERT_UNREACHABLE assert( false )
10714 #define JSON_ASSERT( condition ) assert( condition ); // @todo <= change this into an exception throw
10715 #define JSON_FAIL_MESSAGE( message ) throw std::runtime_error( message );
10716 #define JSON_ASSERT_MESSAGE( condition, message ) if (!( condition )) JSON_FAIL_MESSAGE( message )
10743 static inline char *
10745 unsigned int length =
unknown ) {
10747 length = (
unsigned int)strlen(value);
10748 char *newString =
static_cast<char *
>( malloc( length + 1 ) );
10750 memcpy( newString, value, length );
10751 newString[length] = 0;
10774 #if !defined(JSON_IS_AMALGAMATION)
10775 # ifdef JSON_VALUE_USE_INTERNAL_MAP
10776 # include "json_internalarray.inl"
10777 # include "json_internalmap.inl"
10778 # endif // JSON_VALUE_USE_INTERNAL_MAP
10780 # include "json_valueiterator.inl"
10781 #endif // if !defined(JSON_IS_AMALGAMATION)
10794 Value::CommentInfo::CommentInfo()
10798 Value::CommentInfo::~CommentInfo() {
10805 Value::CommentInfo::setComment(
const char *text ) {
10822 # ifndef JSON_VALUE_USE_INTERNAL_MAP
10827 Value::CZString::CZString(
ArrayIndex index )
10829 , index_( index ) {
10832 Value::CZString::CZString(
const char *cstr, DuplicationPolicy allocate )
10835 , index_( allocate ) {
10838 Value::CZString::CZString(
const CZString &other )
10839 : cstr_( other.index_ != noDuplication && other.cstr_ != 0
10842 , index_( other.cstr_ ? (other.index_ == noDuplication ? noDuplication : duplicate)
10846 Value::CZString::~CZString() {
10847 if ( cstr_ && index_ == duplicate )
10852 Value::CZString::swap( CZString &other ) {
10853 std::swap( cstr_, other.cstr_ );
10854 std::swap( index_, other.index_ );
10858 Value::CZString::operator =(
const CZString &other ) {
10859 CZString temp( other );
10867 return strcmp( cstr_, other.cstr_ ) < 0;
10868 return index_ < other.index_;
10874 return strcmp( cstr_, other.cstr_ ) == 0;
10875 return index_ == other.index_;
10880 Value::CZString::index()
const {
10886 Value::CZString::c_str()
const {
10891 Value::CZString::isStaticString()
const {
10892 return index_ == noDuplication;
10895 #endif // ifndef JSON_VALUE_USE_INTERNAL_MAP
10914 # ifdef JSON_VALUE_USE_INTERNAL_MAP
10926 value_.real_ = 0.0;
10929 value_.string_ = 0;
10931 #ifndef JSON_VALUE_USE_INTERNAL_MAP
10938 value_.array_ = arrayAllocator()->newArray();
10941 value_.map_ = mapAllocator()->newMap();
10945 value_.bool_ =
false;
10953 #if defined(JSON_HAS_INT64)
10957 # ifdef JSON_VALUE_USE_INTERNAL_MAP
10961 value_.uint_ = value;
10967 # ifdef JSON_VALUE_USE_INTERNAL_MAP
10971 value_.int_ = value;
10974 #endif // if defined(JSON_HAS_INT64)
10980 # ifdef JSON_VALUE_USE_INTERNAL_MAP
10984 value_.int_ = value;
10991 # ifdef JSON_VALUE_USE_INTERNAL_MAP
10995 value_.uint_ = value;
11001 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11005 value_.real_ = value;
11010 , allocated_( true )
11012 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11021 const char *endValue )
11023 , allocated_( true )
11025 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11030 (
unsigned int)(endValue - beginValue) );
11036 , allocated_( true )
11038 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11043 (
unsigned int)value.length() );
11049 , allocated_( false )
11051 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11055 value_.string_ =
const_cast<char *
>( value.
c_str() );
11059 # ifdef JSON_USE_CPPTL
11062 , allocated_( true )
11064 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11075 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11079 value_.bool_ = value;
11084 : type_( other.type_ )
11086 # ifdef JSON_VALUE_USE_INTERNAL_MAP
11096 value_ = other.value_;
11099 if ( other.value_.string_ ) {
11104 value_.string_ = 0;
11106 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11113 value_.array_ = arrayAllocator()->newArrayCopy( *other.value_.array_ );
11116 value_.map_ = mapAllocator()->newMapCopy( *other.value_.map_ );
11122 if ( other.comments_ ) {
11125 const CommentInfo &otherComment = other.comments_[comment];
11126 if ( otherComment.comment_ )
11127 comments_[comment].setComment( otherComment.comment_ );
11145 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11148 delete value_.map_;
11152 arrayAllocator()->destructArray( value_.array_ );
11155 mapAllocator()->destructMap( value_.map_ );
11163 delete[] comments_;
11168 Value temp( other );
11176 type_ = other.type_;
11177 other.type_ = temp;
11178 std::swap( value_, other.value_ );
11179 int temp2 = allocated_;
11180 allocated_ = other.allocated_;
11181 other.allocated_ = temp2;
11192 if ( *
this < other )
11194 if ( *
this > other )
11202 int typeDelta = type_ - other.type_;
11204 return typeDelta < 0 ?
true :
false;
11209 return value_.int_ < other.value_.int_;
11211 return value_.uint_ < other.value_.uint_;
11213 return value_.real_ < other.value_.real_;
11215 return value_.bool_ < other.value_.bool_;
11217 return ( value_.string_ == 0 && other.value_.string_ )
11218 || ( other.value_.string_
11220 && strcmp( value_.string_, other.value_.string_ ) < 0 );
11221 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11224 int delta = int( value_.map_->size() - other.value_.map_->size() );
11227 return (*value_.map_) < (*other.value_.map_);
11231 return value_.array_->compare( *(other.value_.array_) ) < 0;
11233 return value_.map_->compare( *(other.value_.map_) ) < 0;
11243 return !(other < *
this);
11248 return !(*
this < other);
11253 return other < *
this;
11262 int temp = other.type_;
11263 if ( type_ != temp )
11269 return value_.int_ == other.value_.int_;
11271 return value_.uint_ == other.value_.uint_;
11273 return value_.real_ == other.value_.real_;
11275 return value_.bool_ == other.value_.bool_;
11277 return ( value_.string_ == other.value_.string_ )
11278 || ( other.value_.string_
11280 && strcmp( value_.string_, other.value_.string_ ) == 0 );
11281 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11284 return value_.map_->size() == other.value_.map_->size()
11285 && (*value_.map_) == (*other.value_.map_);
11288 return value_.array_->compare( *(other.value_.array_) ) == 0;
11290 return value_.map_->compare( *(other.value_.map_) ) == 0;
11301 return !( *
this == other );
11307 return value_.string_;
11317 return value_.string_ ? value_.string_ :
"";
11319 return value_.bool_ ?
"true" :
"false";
11332 # ifdef JSON_USE_CPPTL
11334 Value::asConstString()
const
11336 return CppTL::ConstString(
asString().c_str() );
11349 return Int(value_.int_);
11352 return Int(value_.uint_);
11355 return Int( value_.real_ );
11357 return value_.bool_ ? 1 : 0;
11375 JSON_ASSERT_MESSAGE( value_.int_ >= 0,
"Negative integer can not be converted to unsigned integer" );
11377 return UInt(value_.int_);
11380 return UInt(value_.uint_);
11383 return UInt( value_.real_ );
11385 return value_.bool_ ? 1 : 0;
11397 # if defined(JSON_HAS_INT64)
11405 return value_.int_;
11408 return value_.uint_;
11411 return Int( value_.real_ );
11413 return value_.bool_ ? 1 : 0;
11431 JSON_ASSERT_MESSAGE( value_.int_ >= 0,
"Negative integer can not be converted to UInt64" );
11432 return value_.int_;
11434 return value_.uint_;
11437 return UInt( value_.real_ );
11439 return value_.bool_ ? 1 : 0;
11449 # endif // if defined(JSON_HAS_INT64)
11454 #if defined(JSON_NO_INT64)
11464 #if defined(JSON_NO_INT64)
11478 return static_cast<double>( value_.int_ );
11480 #if !defined(JSON_USE_INT64_DOUBLE_CONVERSION)
11481 return static_cast<double>( value_.uint_ );
11482 #else // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION)
11483 return static_cast<double>(
Int(value_.uint_/2) ) * 2 +
Int(value_.uint_ & 1);
11484 #endif // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION)
11486 return value_.real_;
11488 return value_.bool_ ? 1.0 : 0.0;
11505 return static_cast<float>( value_.int_ );
11507 #if !defined(JSON_USE_INT64_DOUBLE_CONVERSION)
11508 return static_cast<float>( value_.uint_ );
11509 #else // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION)
11510 return static_cast<float>(
Int(value_.uint_/2) ) * 2 +
Int(value_.uint_ & 1);
11511 #endif // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION)
11513 return static_cast<float>( value_.real_ );
11515 return value_.bool_ ? 1.0f : 0.0f;
11533 return value_.int_ != 0;
11535 return value_.real_ != 0.0;
11537 return value_.bool_;
11539 return value_.string_ && value_.string_[0] != 0;
11542 return value_.map_->size() != 0;
11556 return ( other ==
nullValue && value_.int_ == 0 )
11558 || ( other ==
uintValue && value_.int_ >= 0 )
11563 return ( other ==
nullValue && value_.uint_ == 0 )
11570 return ( other ==
nullValue && value_.real_ == 0.0 )
11577 return ( other ==
nullValue && value_.bool_ ==
false )
11585 || ( other ==
nullValue && (!value_.string_ || value_.string_[0] == 0) );
11588 || ( other ==
nullValue && value_.map_->size() == 0 );
11591 || ( other ==
nullValue && value_.map_->size() == 0 );
11610 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11612 if ( !value_.map_->empty() ) {
11613 ObjectValues::const_iterator itLast = value_.map_->end();
11615 return (*itLast).first.index()+1;
11622 return Int( value_.array_->size() );
11624 return Int( value_.map_->size() );
11636 return size() == 0u;
11654 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11657 value_.map_->clear();
11661 value_.array_->clear();
11664 value_.map_->clear();
11677 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11679 if ( newSize == 0 )
11681 else if ( newSize > oldSize )
11682 (*this)[ newSize - 1 ];
11684 for (
ArrayIndex index = newSize; index < oldSize; ++index )
11686 value_.map_->erase( index );
11688 assert(
size() == newSize );
11691 value_.array_->resize( newSize );
11701 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11702 CZString key( index );
11703 ObjectValues::iterator it = value_.map_->lower_bound( key );
11704 if ( it != value_.map_->end() && (*it).first == key )
11705 return (*it).second;
11707 ObjectValues::value_type defaultValue( key,
null );
11708 it = value_.map_->insert( it, defaultValue );
11709 return (*it).second;
11711 return value_.array_->resolveReference( index );
11728 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11729 CZString key( index );
11730 ObjectValues::const_iterator it = value_.map_->find( key );
11731 if ( it == value_.map_->end() )
11733 return (*it).second;
11735 Value *value = value_.array_->find( index );
11736 return value ? *value :
null;
11750 return resolveReference( key,
false );
11755 Value::resolveReference(
const char *key,
11760 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11761 CZString actualKey( key, isStatic ? CZString::noDuplication
11762 : CZString::duplicateOnCopy );
11763 ObjectValues::iterator it = value_.map_->lower_bound( actualKey );
11764 if ( it != value_.map_->end() && (*it).first == actualKey )
11765 return (*it).second;
11767 ObjectValues::value_type defaultValue( actualKey,
null );
11768 it = value_.map_->insert( it, defaultValue );
11769 Value &value = (*it).second;
11772 return value_.map_->resolveReference( key, isStatic );
11779 const Value &defaultValue )
const {
11780 const Value *value = &((*this)[index]);
11781 return value == &
null ? defaultValue : *value;
11787 return index <
size();
11797 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11798 CZString actualKey( key, CZString::noDuplication );
11799 ObjectValues::const_iterator it = value_.map_->find( actualKey );
11800 if ( it == value_.map_->end() )
11802 return (*it).second;
11804 const Value *value = value_.map_->find( key );
11805 return value ? *value :
null;
11812 return (*
this)[ key.c_str() ];
11818 return (*
this)[ key.c_str() ];
11823 return resolveReference( key,
true );
11827 # ifdef JSON_USE_CPPTL
11830 return (*
this)[ key.c_str() ];
11836 return (*
this)[ key.c_str() ];
11843 return (*
this)[
size()] = value;
11849 const Value &defaultValue )
const {
11850 const Value *value = &((*this)[key]);
11851 return value == &
null ? defaultValue : *value;
11857 const Value &defaultValue )
const {
11858 return get( key.c_str(), defaultValue );
11866 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11867 CZString actualKey( key, CZString::noDuplication );
11868 ObjectValues::iterator it = value_.map_->find( actualKey );
11869 if ( it == value_.map_->end() )
11871 Value old(it->second);
11872 value_.map_->erase(it);
11875 Value *value = value_.map_->find( key );
11878 value_.map_.remove( key );
11891 # ifdef JSON_USE_CPPTL
11894 const Value &defaultValue )
const {
11895 return get( key.c_str(), defaultValue );
11901 const Value *value = &((*this)[key]);
11902 return value != &
null;
11912 # ifdef JSON_USE_CPPTL
11925 members.reserve( value_.map_->size() );
11926 #ifndef JSON_VALUE_USE_INTERNAL_MAP
11927 ObjectValues::const_iterator it = value_.map_->begin();
11928 ObjectValues::const_iterator itEnd = value_.map_->end();
11929 for ( ; it != itEnd; ++it )
11930 members.push_back( std::string( (*it).first.c_str() ) );
11932 ValueInternalMap::IteratorState it;
11933 ValueInternalMap::IteratorState itEnd;
11934 value_.map_->makeBeginIterator( it );
11935 value_.map_->makeEndIterator( itEnd );
11936 for ( ; !ValueInternalMap::equals( it, itEnd ); ValueInternalMap::increment(it) )
11937 members.push_back( std::string( ValueInternalMap::key( it ) ) );
12035 comments_[placement].setComment( comment );
12048 return comments_ != 0 && comments_[placement].comment_ != 0;
12054 return comments_[placement].comment_;
12062 return writer.
write( *
this );
12069 #ifdef JSON_VALUE_USE_INTERNAL_MAP
12071 if ( value_.array_ ) {
12072 ValueInternalArray::IteratorState it;
12073 value_.array_->makeBeginIterator( it );
12078 if ( value_.map_ ) {
12079 ValueInternalMap::IteratorState it;
12080 value_.map_->makeBeginIterator( it );
12100 #ifdef JSON_VALUE_USE_INTERNAL_MAP
12102 if ( value_.array_ ) {
12103 ValueInternalArray::IteratorState it;
12104 value_.array_->makeEndIterator( it );
12109 if ( value_.map_ ) {
12110 ValueInternalMap::IteratorState it;
12111 value_.map_->makeEndIterator( it );
12132 #ifdef JSON_VALUE_USE_INTERNAL_MAP
12134 if ( value_.array_ ) {
12135 ValueInternalArray::IteratorState it;
12136 value_.array_->makeBeginIterator( it );
12141 if ( value_.map_ ) {
12142 ValueInternalMap::IteratorState it;
12143 value_.map_->makeBeginIterator( it );
12151 return iterator( value_.map_->begin() );
12163 #ifdef JSON_VALUE_USE_INTERNAL_MAP
12165 if ( value_.array_ ) {
12166 ValueInternalArray::IteratorState it;
12167 value_.array_->makeEndIterator( it );
12172 if ( value_.map_ ) {
12173 ValueInternalMap::IteratorState it;
12174 value_.map_->makeEndIterator( it );
12182 return iterator( value_.map_->end() );
12196 : kind_( kindNone ) {
12202 , kind_( kindIndex ) {
12208 , kind_( kindKey ) {
12213 : key_( key.c_str() )
12214 , kind_( kindKey ) {
12227 in.push_back( &a1 );
12228 in.push_back( &a2 );
12229 in.push_back( &a3 );
12230 in.push_back( &a4 );
12231 in.push_back( &a5 );
12232 makePath( path, in );
12237 Path::makePath(
const std::string &path,
12238 const InArgs &
in ) {
12239 const char *current = path.c_str();
12240 const char *end = current + path.length();
12241 InArgs::const_iterator itInArg = in.begin();
12242 while ( current != end ) {
12243 if ( *current ==
'[' ) {
12245 if ( *current ==
'%' )
12246 addPathInArg( path, in, itInArg, PathArgument::kindIndex );
12249 for ( ; current != end && *current >=
'0' && *current <=
'9'; ++current )
12250 index = index * 10 +
ArrayIndex(*current -
'0');
12251 args_.push_back( index );
12253 if ( current == end || *current++ !=
']' )
12254 invalidPath( path,
int(current - path.c_str()) );
12256 else if ( *current ==
'%' ) {
12257 addPathInArg( path, in, itInArg, PathArgument::kindKey );
12260 else if ( *current ==
'.' ) {
12263 const char *beginName = current;
12264 while ( current != end && !strchr(
"[.", *current ) )
12266 args_.push_back( std::string( beginName, current ) );
12273 Path::addPathInArg(
const std::string &path,
12275 InArgs::const_iterator &itInArg,
12276 PathArgument::Kind kind ) {
12277 if ( itInArg == in.end() ) {
12279 }
else if ( (*itInArg)->kind_ != kind ) {
12282 args_.push_back( **itInArg );
12288 Path::invalidPath(
const std::string &path,
12296 const Value *node = &root;
12297 for ( Args::const_iterator it = args_.begin(); it != args_.end(); ++it ) {
12299 if ( arg.kind_ == PathArgument::kindIndex ) {
12303 node = &((*node)[arg.index_]);
12304 }
else if ( arg.kind_ == PathArgument::kindKey ) {
12308 node = &((*node)[arg.key_]);
12320 const Value &defaultValue )
const {
12321 const Value *node = &root;
12322 for ( Args::const_iterator it = args_.begin(); it != args_.end(); ++it ) {
12324 if ( arg.kind_ == PathArgument::kindIndex ) {
12326 return defaultValue;
12327 node = &((*node)[arg.index_]);
12328 }
else if ( arg.kind_ == PathArgument::kindKey ) {
12330 return defaultValue;
12331 node = &((*node)[arg.key_]);
12333 return defaultValue;
12342 Value *node = &root;
12343 for ( Args::const_iterator it = args_.begin(); it != args_.end(); ++it ) {
12345 if ( arg.kind_ == PathArgument::kindIndex ) {
12349 node = &((*node)[arg.index_]);
12350 }
else if ( arg.kind_ == PathArgument::kindKey ) {
12354 node = &((*node)[arg.key_]);
12381 #if !defined(JSON_IS_AMALGAMATION)
12382 # include <json/writer.h>
12383 # include "json_tool.h"
12384 #endif // if !defined(JSON_IS_AMALGAMATION)
12386 #include <assert.h>
12388 #include <string.h>
12389 #include <iostream>
12393 #if _MSC_VER >= 1400 // VC++ 8.0
12394 #pragma warning( disable : 4996 ) // disable warning about strdup being deprecated.
12410 char *current = buffer +
sizeof(buffer);
12411 bool isNegative = value < 0;
12417 assert( current >= buffer );
12424 char *current = buffer +
sizeof(buffer);
12426 assert( current >= buffer );
12430 #if defined(JSON_HAS_INT64)
12442 #endif // # if defined(JSON_HAS_INT64)
12447 #if defined(_MSC_VER) && defined(__STDC_SECURE_LIB__) // Use secure version with visual studio 2005 to avoid warning.
12448 sprintf_s(buffer,
sizeof(buffer),
"%#.16g", value);
12450 sprintf(buffer,
"%#.16g", value);
12452 char* ch = buffer + strlen(buffer) - 1;
12453 if (*ch !=
'0')
return buffer;
12454 while(ch > buffer && *ch ==
'0'){
12457 char* last_nonzero = ch;
12458 while(ch >= buffer){
12474 *(last_nonzero+2) =
'\0';
12485 return value ?
"true" :
"false";
12491 return std::string(
"\"") + value +
"\"";
12495 std::string::size_type maxsize = strlen(value)*2 + 3;
12496 std::string result;
12497 result.reserve(maxsize);
12499 for (
const char* c=value; *c != 0; ++c) {
12532 std::ostringstream oss;
12533 oss <<
"\\u" << std::hex << std::uppercase << std::setfill('0') << std::setw(4) << static_cast<int>(*c);
12534 result += oss.str();
12555 : yamlCompatiblityEnabled_( false ) {
12561 yamlCompatiblityEnabled_ =
true;
12568 writeValue( root );
12575 FastWriter::writeValue(
const Value &value ) {
12576 switch ( value.
type() ) {
12578 document_ +=
"null";
12597 int size = value.
size();
12598 for (
int index =0; index < size; ++index ) {
12601 writeValue( value[index] );
12609 for ( Value::Members::iterator it = members.begin();
12610 it != members.end();
12612 const std::string &name = *it;
12613 if ( it != members.begin() )
12616 document_ += yamlCompatiblityEnabled_ ?
": "
12618 writeValue( value[name] );
12631 : rightMargin_( 74 )
12632 , indentSize_( 3 ) {
12639 addChildValues_ =
false;
12640 indentString_ =
"";
12641 writeCommentBeforeValue( root );
12642 writeValue( root );
12643 writeCommentAfterValueOnSameLine( root );
12650 StyledWriter::writeValue(
const Value &value ) {
12651 switch ( value.
type() ) {
12653 pushValue(
"null" );
12671 writeArrayValue( value);
12676 if ( members.empty() )
12679 writeWithIndent(
"{" );
12681 Value::Members::iterator it = members.begin();
12683 const std::string &name = *it;
12685 writeCommentBeforeValue( childValue );
12687 document_ +=
" : ";
12688 writeValue( childValue );
12689 if ( ++it == members.end() ) {
12690 writeCommentAfterValueOnSameLine( childValue );
12694 writeCommentAfterValueOnSameLine( childValue );
12697 writeWithIndent(
"}" );
12706 StyledWriter::writeArrayValue(
const Value &value ) {
12707 unsigned size = value.size();
12711 bool isArrayMultiLine = isMultineArray( value );
12712 if ( isArrayMultiLine ) {
12713 writeWithIndent(
"[" );
12715 bool hasChildValue = !childValues_.empty();
12718 const Value &childValue = value[index];
12719 writeCommentBeforeValue( childValue );
12720 if ( hasChildValue )
12721 writeWithIndent( childValues_[index] );
12724 writeValue( childValue );
12726 if ( ++index == size ) {
12727 writeCommentAfterValueOnSameLine( childValue );
12731 writeCommentAfterValueOnSameLine( childValue );
12734 writeWithIndent(
"]" );
12736 assert( childValues_.size() == size );
12738 for (
unsigned index =0; index < size; ++index ) {
12741 document_ += childValues_[index];
12750 StyledWriter::isMultineArray(
const Value &value ) {
12751 int size = value.size();
12752 bool isMultiLine = size*3 >= rightMargin_ ;
12753 childValues_.clear();
12754 for (
int index =0; index < size && !isMultiLine; ++index ) {
12755 const Value &childValue = value[index];
12756 isMultiLine = isMultiLine ||
12757 ( (childValue.isArray() || childValue.isObject()) &&
12758 childValue.size() > 0 );
12760 if ( !isMultiLine ) {
12761 childValues_.reserve( size );
12762 addChildValues_ =
true;
12763 int lineLength = 4 + (size-1)*2;
12764 for (
int index =0; index < size && !isMultiLine; ++index ) {
12765 writeValue( value[index] );
12766 lineLength += int( childValues_[index].length() );
12767 isMultiLine = isMultiLine && hasCommentForValue( value[index] );
12769 addChildValues_ =
false;
12770 isMultiLine = isMultiLine || lineLength >= rightMargin_;
12772 return isMultiLine;
12777 StyledWriter::pushValue(
const std::string &value ) {
12778 if ( addChildValues_ )
12779 childValues_.push_back( value );
12781 document_ += value;
12786 StyledWriter::writeIndent() {
12787 if ( !document_.empty() )
12789 char last = document_[document_.length()-1];
12792 if ( last !=
'\n' )
12795 document_ += indentString_;
12800 StyledWriter::writeWithIndent(
const std::string &value ) {
12802 document_ += value;
12807 StyledWriter::indent() {
12808 indentString_ += std::string( indentSize_,
' ' );
12813 StyledWriter::unindent() {
12814 assert(
int(indentString_.size()) >= indentSize_ );
12815 indentString_.resize( indentString_.size() - indentSize_ );
12820 StyledWriter::writeCommentBeforeValue(
const Value &root ) {
12823 document_ += normalizeEOL( root.getComment(
commentBefore ) );
12829 StyledWriter::writeCommentAfterValueOnSameLine(
const Value &root ) {
12835 document_ += normalizeEOL( root.getComment(
commentAfter ) );
12842 StyledWriter::hasCommentForValue(
const Value &value ) {
12850 StyledWriter::normalizeEOL(
const std::string &text ) {
12851 std::string normalized;
12852 normalized.reserve( text.length() );
12853 const char *begin = text.c_str();
12854 const char *end = begin + text.length();
12855 const char *current = begin;
12856 while ( current != end ) {
12857 char c = *current++;
12859 if ( *current ==
'\n' )
12861 normalized +=
'\n';
12874 , rightMargin_( 74 )
12875 , indentation_( indentation ) {
12882 addChildValues_ =
false;
12883 indentString_ =
"";
12884 writeCommentBeforeValue( root );
12885 writeValue( root );
12886 writeCommentAfterValueOnSameLine( root );
12887 *document_ <<
"\n";
12893 StyledStreamWriter::writeValue(
const Value &value ) {
12894 switch ( value.
type() ) {
12896 pushValue(
"null" );
12914 writeArrayValue( value);
12918 if ( members.empty() )
12921 writeWithIndent(
"{" );
12923 Value::Members::iterator it = members.begin();
12925 const std::string &name = *it;
12927 writeCommentBeforeValue( childValue );
12929 *document_ <<
" : ";
12930 writeValue( childValue );
12931 if ( ++it == members.end() ) {
12932 writeCommentAfterValueOnSameLine( childValue );
12936 writeCommentAfterValueOnSameLine( childValue );
12939 writeWithIndent(
"}" );
12948 StyledStreamWriter::writeArrayValue(
const Value &value ) {
12949 unsigned size = value.size();
12953 bool isArrayMultiLine = isMultineArray( value );
12954 if ( isArrayMultiLine ) {
12955 writeWithIndent(
"[" );
12957 bool hasChildValue = !childValues_.empty();
12960 const Value &childValue = value[index];
12961 writeCommentBeforeValue( childValue );
12962 if ( hasChildValue )
12963 writeWithIndent( childValues_[index] );
12966 writeValue( childValue );
12968 if ( ++index == size ) {
12969 writeCommentAfterValueOnSameLine( childValue );
12973 writeCommentAfterValueOnSameLine( childValue );
12976 writeWithIndent(
"]" );
12979 assert( childValues_.size() == size );
12980 *document_ <<
"[ ";
12981 for (
unsigned index =0; index < size; ++index ) {
12983 *document_ <<
", ";
12984 *document_ << childValues_[index];
12986 *document_ <<
" ]";
12993 StyledStreamWriter::isMultineArray(
const Value &value ) {
12994 int size = value.size();
12995 bool isMultiLine = size*3 >= rightMargin_ ;
12996 childValues_.clear();
12997 for (
int index =0; index < size && !isMultiLine; ++index ) {
12998 const Value &childValue = value[index];
12999 isMultiLine = isMultiLine ||
13000 ( (childValue.isArray() || childValue.isObject()) &&
13001 childValue.size() > 0 );
13003 if ( !isMultiLine ) {
13004 childValues_.reserve( size );
13005 addChildValues_ =
true;
13006 int lineLength = 4 + (size-1)*2;
13007 for (
int index =0; index < size && !isMultiLine; ++index ) {
13008 writeValue( value[index] );
13009 lineLength += int( childValues_[index].length() );
13010 isMultiLine = isMultiLine && hasCommentForValue( value[index] );
13012 addChildValues_ =
false;
13013 isMultiLine = isMultiLine || lineLength >= rightMargin_;
13015 return isMultiLine;
13020 StyledStreamWriter::pushValue(
const std::string &value ) {
13021 if ( addChildValues_ )
13022 childValues_.push_back( value );
13024 *document_ << value;
13029 StyledStreamWriter::writeIndent() {
13042 *document_ <<
'\n' << indentString_;
13047 StyledStreamWriter::writeWithIndent(
const std::string &value ) {
13049 *document_ << value;
13054 StyledStreamWriter::indent() {
13055 indentString_ += indentation_;
13060 StyledStreamWriter::unindent() {
13061 assert( indentString_.size() >= indentation_.size() );
13062 indentString_.resize( indentString_.size() - indentation_.size() );
13067 StyledStreamWriter::writeCommentBeforeValue(
const Value &root ) {
13070 *document_ << normalizeEOL( root.getComment(
commentBefore ) );
13071 *document_ <<
"\n";
13076 StyledStreamWriter::writeCommentAfterValueOnSameLine(
const Value &root ) {
13081 *document_ <<
"\n";
13082 *document_ << normalizeEOL( root.getComment(
commentAfter ) );
13083 *document_ <<
"\n";
13089 StyledStreamWriter::hasCommentForValue(
const Value &value ) {
13097 StyledStreamWriter::normalizeEOL(
const std::string &text ) {
13098 std::string normalized;
13099 normalized.reserve( text.length() );
13100 const char *begin = text.c_str();
13101 const char *end = begin + text.length();
13102 const char *current = begin;
13103 while ( current != end ) {
13104 char c = *current++;
13106 if ( *current ==
'\n' )
13108 normalized +=
'\n';
13118 writer.
write(sout, root);
13166 #ifndef PYNE_IS_AMALGAMATED
13168 #include "jsoncustomwriter.h"
13174 std::string closecurly,
13175 std::string opensquare,
13176 std::string closesquare,
13179 std::string indent,
13181 : opencurly_( opencurly )
13182 , closecurly_( closecurly )
13183 , opensquare_( opensquare )
13184 , closesquare_( closesquare )
13187 , indent_( indent )
13188 , maxWidth_( maxWidth )
13197 indentString_ =
"";
13198 writeValue( root, document_,
false );
13205 CustomWriter::writeValue(
const Value &value, std::string &
doc,
bool forceSingleLine )
13207 switch ( value.
type() )
13229 bool isMulti =
false;
13230 if (!forceSingleLine)
13232 std::string valLine =
"";
13233 writeValue( value, valLine,
true);
13234 if (valLine.length() > maxWidth_)
13244 doc += opensquare_;
13247 for (
int index =0; index < value.
size(); ++index )
13252 doc += indentString_;
13254 writeValue( value[index], doc,
false );
13255 if ( index < value.
size()-1 )
13262 doc += indentString_;
13264 doc += closesquare_;
13269 bool isMulti =
false;
13270 if (!forceSingleLine)
13272 std::string valLine =
"";
13273 writeValue( value, valLine,
true);
13274 if (valLine.length() > maxWidth_)
13288 for ( Value::Members::iterator it = members.begin();
13289 it != members.end();
13295 doc += indentString_;
13298 const std::string &name = *it;
13301 writeValue( value[name], doc, forceSingleLine );
13302 if ( !(it + 1 == members.end()) )
13309 doc += indentString_;
13311 doc += closecurly_;
13319 CustomWriter::indent()
13321 indentString_ += indent_;
13326 CustomWriter::unindent()
13328 int idSize = int(indent_.size());
13329 int idsSize = int(indentString_.size());
13330 if (idsSize >= idSize)
13331 indentString_.resize (idsSize - idSize);
13351 #include <stdexcept>
13353 #ifndef PYNE_IS_AMALGAMATED
13370 sum = sum + i->second;
13378 double sum = get_comp_sum();
13379 if (sum != 1.0 && sum != 0.0) {
13380 for (
comp_iter i = comp.begin(); i != comp.end(); i++)
13381 i->second = i->second / sum;
13394 hid_t matgroup = H5Gopen2(db, datapath.c_str(), H5P_DEFAULT);
13398 std::string nuckey;
13401 H5G_info_t group_info;
13402 H5Gget_info(matgroup, &group_info);
13403 hsize_t matG = group_info.nlinks;
13406 for (
int matg = 0; matg < matG; matg++) {
13407 nuckeylen = 1 + H5Lget_name_by_idx(matgroup,
".", H5_INDEX_NAME, H5_ITER_INC, matg,
13408 NULL, 0, H5P_DEFAULT);
13409 char * nkey =
new char[nuckeylen];
13410 nuckeylen = H5Lget_name_by_idx(matgroup,
".", H5_INDEX_NAME, H5_ITER_INC, matg,
13411 nkey, nuckeylen, H5P_DEFAULT);
13413 nucset = H5Dopen2(matgroup, nkey, H5P_DEFAULT);
13414 nucvalue = h5wrap::get_array_index<double>(nucset, row);
13416 if (nuckey ==
"Mass" || nuckey ==
"MASS" || nuckey ==
"mass")
13426 atoms_per_molecule = -1.0;
13432 std::string nucpath;
13433 hid_t data_set = H5Dopen2(db, datapath.c_str(), H5P_DEFAULT);
13435 hsize_t data_offset[1] = {row};
13438 hid_t data_space = H5Dget_space(data_set);
13439 hsize_t data_dims[1];
13440 H5Sget_simple_extent_dims(data_space, data_dims, NULL);
13441 data_offset[0] += data_dims[0];
13445 hid_t nuc_attr = H5Aopen(data_set,
"nucpath", H5P_DEFAULT);
13446 H5A_info_t nuc_info;
13447 H5Aget_info(nuc_attr, &nuc_info);
13448 hsize_t nuc_attr_len = nuc_info.data_size;
13449 hid_t str_attr = H5Tcopy(H5T_C_S1);
13450 H5Tset_size(str_attr, nuc_attr_len);
13451 char * nucpathbuf =
new char [nuc_attr_len];
13452 H5Aread(nuc_attr, str_attr, nucpathbuf);
13453 nucpath = std::string(nucpathbuf, nuc_attr_len);
13454 delete[] nucpathbuf;
13457 std::vector<int> nuclides = h5wrap::h5_array_to_cpp_vector_1d<int>(db, nucpath, H5T_NATIVE_INT);
13458 int nuc_size = nuclides.size();
13459 hsize_t nuc_dims[1] = {nuc_size};
13462 hid_t data_hyperslab = H5Dget_space(data_set);
13463 hsize_t data_count[1] = {1};
13464 H5Sselect_hyperslab(data_hyperslab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
13467 hid_t mem_space = H5Screate_simple(1, data_count, NULL);
13471 hid_t desc = H5Tcreate(H5T_COMPOUND, material_data_size);
13472 hid_t comp_values_array_type = H5Tarray_create2(H5T_NATIVE_DOUBLE, 1, nuc_dims);
13477 H5T_NATIVE_DOUBLE);
13479 H5T_NATIVE_DOUBLE);
13486 H5Dread(data_set, desc, mem_space, data_hyperslab, H5P_DEFAULT, mat_data);
13488 mass = (*mat_data).mass;
13489 density = (*mat_data).density;
13490 atoms_per_molecule = (*mat_data).atoms_per_mol;
13491 for (
int i = 0; i < nuc_size; i++)
13492 comp[nuclides[i]] = (
double) (*mat_data).comp[i];
13495 H5Tclose(str_attr);
13500 std::string attrpath = datapath +
"_metadata";
13502 if (!attrpath_exists)
13505 hid_t metadatapace, attrtype, metadataet, metadatalab, attrmemspace;
13507 hvl_t attrdata [1];
13509 attrtype = H5Tvlen_create(H5T_NATIVE_CHAR);
13512 metadataet = H5Dopen2(db, attrpath.c_str(), H5P_DEFAULT);
13513 metadatalab = H5Dget_space(metadataet);
13514 H5Sselect_hyperslab(metadatalab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
13515 attrmemspace = H5Screate_simple(1, data_count, NULL);
13516 H5Dread(metadataet, attrtype, attrmemspace, metadatalab, H5P_DEFAULT, attrdata);
13520 reader.
parse((
char *) attrdata[0].p, (
char *) attrdata[0].p+attrdata[0].len, metadata,
false);
13523 H5Fflush(db, H5F_SCOPE_GLOBAL);
13524 H5Dclose(metadataet);
13525 H5Sclose(metadatapace);
13526 H5Tclose(attrtype);
13537 std::string fname (filename);
13538 std::string dpath (datapath);
13539 from_hdf5(fname, dpath, row, protocol);
13547 H5Eset_auto2(H5E_DEFAULT, NULL, NULL);
13554 bool ish5 = H5Fis_hdf5(filename.c_str());
13560 fapl = H5Pcreate(H5P_FILE_ACCESS);
13561 H5Pset_fclose_degree(fapl,H5F_CLOSE_STRONG);
13563 hid_t db = H5Fopen(filename.c_str(), H5F_ACC_RDONLY, fapl);
13566 if (!datapath_exists)
13574 _load_comp_protocol0(db, datapath, row);
13575 else if (protocol == 1)
13576 _load_comp_protocol1(db, datapath, row);
13581 status = H5Fclose(db);
13592 std::string fname (filename);
13593 std::string groupname (datapath);
13594 std::string nuclist (nucpath);
13595 write_hdf5(fname, groupname, nuclist, row, chunksize);
13601 std::string nucpath,
float row,
int chunksize) {
13602 int row_num = (int) row;
13605 H5Eset_auto2(H5E_DEFAULT, NULL, NULL);
13609 fapl = H5Pcreate(H5P_FILE_ACCESS);
13610 H5Pset_fclose_degree(fapl,H5F_CLOSE_STRONG);
13614 bool ish5 = H5Fis_hdf5(filename.c_str());
13617 db = H5Fopen(filename.c_str(), H5F_ACC_RDWR, fapl);
13620 db = H5Fcreate(filename.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, fapl);
13626 std::vector<int> nuclides;
13628 hsize_t nuc_dims[1];
13630 if (nucpath_exists) {
13631 nuclides = h5wrap::h5_array_to_cpp_vector_1d<int>(db, nucpath, H5T_NATIVE_INT);
13632 nuc_size = nuclides.size();
13633 nuc_dims[0] = nuc_size;
13635 nuclides = std::vector<int>();
13637 nuclides.push_back(i->first);
13638 nuc_size = nuclides.size();
13641 int nuc_data [nuc_size];
13642 for (
int n = 0; n != nuc_size; n++)
13643 nuc_data[n] = nuclides[n];
13644 nuc_dims[0] = nuc_size;
13645 hid_t nuc_space = H5Screate_simple(1, nuc_dims, NULL);
13646 hid_t nuc_set = H5Dcreate2(db, nucpath.c_str(), H5T_NATIVE_INT, nuc_space,
13647 H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
13648 H5Dwrite(nuc_set, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, nuc_data);
13649 H5Fflush(db, H5F_SCOPE_GLOBAL);
13656 hid_t data_set, data_space, data_hyperslab;
13658 hsize_t data_dims[1] = {1};
13659 hsize_t data_max_dims[1] = {H5S_UNLIMITED};
13660 hsize_t data_offset[1] = {0};
13663 hid_t desc = H5Tcreate(H5T_COMPOUND, material_data_size);
13664 hid_t comp_values_array_type = H5Tarray_create2(H5T_NATIVE_DOUBLE, 1, nuc_dims);
13669 H5T_NATIVE_DOUBLE);
13671 H5T_NATIVE_DOUBLE);
13673 comp_values_array_type);
13676 (*mat_data).
mass = mass;
13677 (*mat_data).density = density;
13678 (*mat_data).atoms_per_mol = atoms_per_molecule;
13679 for (
int n = 0; n != nuc_size; n++) {
13680 if (0 < comp.count(nuclides[n]))
13681 (*mat_data).comp[n] = comp[nuclides[n]];
13683 (*mat_data).comp[n] = 0.0;
13688 if (datapath_exists) {
13689 data_set = H5Dopen2(db, datapath.c_str(), H5P_DEFAULT);
13690 data_space = H5Dget_space(data_set);
13691 data_rank = H5Sget_simple_extent_dims(data_space, data_dims, data_max_dims);
13694 if (std::signbit(row))
13695 row_num = data_dims[0] + row;
13697 if (data_dims[0] <= row_num) {
13700 data_dims[0] = row_num + 1;
13701 H5Dset_extent(data_set, data_dims);
13704 data_offset[0] = row_num;
13707 data_space = H5Screate_simple(1, data_dims, data_max_dims);
13710 hid_t data_set_params = H5Pcreate(H5P_DATASET_CREATE);
13711 hsize_t chunk_dims[1] ={chunksize};
13712 H5Pset_chunk(data_set_params, 1, chunk_dims);
13713 H5Pset_deflate(data_set_params, 1);
13716 data_set = H5Dcreate2(db, datapath.c_str(), desc, data_space, H5P_DEFAULT,
13717 data_set_params, H5P_DEFAULT);
13718 H5Dset_extent(data_set, data_dims);
13721 hid_t nuc_attr_type = H5Tcopy(H5T_C_S1);
13722 H5Tset_size(nuc_attr_type, nucpath.length());
13723 hid_t nuc_attr_space = H5Screate(H5S_SCALAR);
13724 hid_t nuc_attr = H5Acreate2(data_set,
"nucpath", nuc_attr_type, nuc_attr_space,
13725 H5P_DEFAULT, H5P_DEFAULT);
13726 H5Awrite(nuc_attr, nuc_attr_type, nucpath.c_str());
13727 H5Fflush(db, H5F_SCOPE_GLOBAL);
13731 data_hyperslab = H5Dget_space(data_set);
13732 hsize_t data_count[1] = {1};
13733 H5Sselect_hyperslab(data_hyperslab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
13736 hid_t mem_space = H5Screate_simple(1, data_count, data_max_dims);
13739 H5Dwrite(data_set, desc, mem_space, data_hyperslab, H5P_DEFAULT, mat_data);
13742 H5Fflush(db, H5F_SCOPE_GLOBAL);
13743 H5Dclose(data_set);
13744 H5Sclose(data_space);
13750 std::string attrpath = datapath +
"_metadata";
13751 hid_t metadatapace, attrtype, metadataet, metadatalab, attrmemspace;
13754 attrtype = H5Tvlen_create(H5T_NATIVE_CHAR);
13758 if (attrpath_exists) {
13759 metadataet = H5Dopen2(db, attrpath.c_str(), H5P_DEFAULT);
13760 metadatapace = H5Dget_space(metadataet);
13761 attrrank = H5Sget_simple_extent_dims(metadatapace, data_dims, data_max_dims);
13763 if (data_dims[0] <= row_num) {
13766 data_dims[0] = row_num + 1;
13767 H5Dset_extent(metadataet, data_dims);
13770 data_offset[0] = row_num;
13772 hid_t metadataetparams;
13773 hsize_t attrchunkdims [1];
13776 metadataetparams = H5Pcreate(H5P_DATASET_CREATE);
13777 attrchunkdims[0] = chunksize;
13778 H5Pset_chunk(metadataetparams, 1, attrchunkdims);
13779 H5Pset_deflate(metadataetparams, 1);
13781 hvl_t attrfillvalue [1];
13782 attrfillvalue[0].len = 3;
13783 attrfillvalue[0].p = (
char *)
"{}\n";
13784 H5Pset_fill_value(metadataetparams, attrtype, &attrfillvalue);
13787 metadatapace = H5Screate_simple(1, data_dims, data_max_dims);
13788 metadataet = H5Dcreate2(db, attrpath.c_str(), attrtype, metadatapace,
13789 H5P_DEFAULT, metadataetparams, H5P_DEFAULT);
13790 H5Dset_extent(metadataet, data_dims);
13791 H5Pclose(metadataetparams);
13795 hvl_t attrdata [1];
13797 std::string metadatatr = writer.
write(metadata);
13798 attrdata[0].p = (
char *) metadatatr.c_str();
13799 attrdata[0].len = metadatatr.length();
13802 metadatalab = H5Dget_space(metadataet);
13803 H5Sselect_hyperslab(metadatalab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
13804 attrmemspace = H5Screate_simple(1, data_count, data_max_dims);
13805 H5Dwrite(metadataet, attrtype, attrmemspace, metadatalab, H5P_DEFAULT, attrdata);
13808 H5Fflush(db, H5F_SCOPE_GLOBAL);
13809 H5Dclose(metadataet);
13810 H5Sclose(metadatapace);
13811 H5Tclose(attrtype);
13822 std::ostringstream oss;
13824 if (metadata.isMember(
"name")) {
13825 oss <<
"C name: " << metadata[
"name"].asString() << std::endl;
13828 if (density != -1.0) {
13829 std::stringstream ds;
13830 ds << std::setprecision(1) << std::fixed <<
"C density = " << density << std::endl;
13834 if (metadata.isMember(
"source")) {
13835 oss <<
"C source: " << metadata[
"source"].asString() << std::endl;
13838 if (metadata.isMember(
"comments")) {
13839 std::string comment_string =
"comments: " + metadata[
"comments"].asString();
13841 if (comment_string.length() <= 77) {
13842 oss <<
"C " << comment_string << std::endl;
13845 oss <<
"C " << comment_string.substr(0,77) << std::endl;
13846 std::string remainder_string = comment_string.substr(77);
13847 while (remainder_string.length() > 77) {
13848 oss <<
"C " << remainder_string.substr(0,77) << std::endl;
13849 remainder_string.erase(0,77);
13851 if (remainder_string.length() > 0) {
13852 oss <<
"C " << remainder_string << std::endl;
13859 if (metadata.isMember(
"mat_number")) {
13860 int mat_num = metadata[
"mat_number"].asInt();
13861 oss << mat_num << std::endl;
13863 oss <<
"?" << std::endl;
13867 std::map<int, double> fracs;
13868 std::string frac_sign;
13870 if (
"atom" == frac_type) {
13871 fracs = to_atom_frac();
13880 std::stringstream ss;
13881 std::string nucmcnp;
13882 std::string table_item;
13884 if (i->second > 0.0) {
13886 ss.str(std::string());
13889 nucmcnp = ss.str();
13894 table_item = metadata[
"table_ids"][nucmcnp].asString();
13895 if (!table_item.empty()) {
13896 oss <<
" " << mcnp_id <<
"." << table_item <<
" ";
13898 oss <<
" " << mcnp_id <<
" ";
13901 std::stringstream fs;
13902 fs << std::setprecision(4) << std::scientific << frac_sign << i->second \
13930 std::stringstream rs;
13933 if (comp.size() == 1) {
13934 rs << fluka_material_str(
id);
13935 }
else if (comp.size() > 1) {
13937 rs << fluka_compound_str(
id, frac_type);
13939 rs <<
"There is no nuclide information in the Material Object" << std::endl;
13955 std::stringstream ms;
13956 std::string fluka_name;
13958 int nucid = comp.begin()->first;
13961 if (metadata.isMember(
"fluka_name")) {
13962 fluka_name = metadata[
"fluka_name"].asString();
13964 if (comp.size() > 1 ) {
13965 std::cerr <<
"Error: this mix is a compound, there should be a fluka_name defined."
13972 if (not_fluka_builtin(fluka_name)) {
13973 ms << fluka_material_component(
id, nucid, fluka_name);
13988 std::string fluka_name) {
13999 return fluka_material_line(znum, atomic_mass, fid, fluka_name);
14007 int fid, std::string fluka_name) {
14008 std::stringstream ls;
14010 if (metadata.isMember(
"comments") ) {
14011 std::string comment = metadata[
"comments"].asString();
14012 ls <<
"* " << comment;
14015 ls << std::setw(10) << std::left <<
"MATERIAL";
14016 ls << std::setprecision(0) << std::fixed << std::showpoint <<
14017 std::setw(10) << std::right << (float)znum;
14019 ls << fluka_format_field(atomic_mass);
14021 ls << fluka_format_field(std::sqrt(density*density));
14023 ls << std::setprecision(0) << std::fixed << std::showpoint <<
14024 std::setw(10) << std::right << (float)fid;
14025 ls << std::setw(10) << std::right <<
"";
14026 ls << std::setw(10) << std::right <<
"";
14027 ls << std::setw(10) << std::left << fluka_name << std::endl;
14041 std::stringstream ls;
14043 modf (field, &intpart);
14044 if (field == intpart) {
14045 ls << std::setprecision(0) << std::fixed << std::showpoint
14046 << std::setw(10) << std::right << field;
14049 ls.unsetf(std::ios::showpoint);
14050 ls.unsetf(std::ios::floatfield);
14052 ls << std::setw(10) << std::right << field;
14065 std::stringstream ss;
14066 std::map<double, std::string> frac_name_map;
14067 std::string compound_string =
"";
14068 std::vector<std::string> material_names;
14074 std::string compound_name;
14075 if (metadata.isMember(
"fluka_name")) {
14076 compound_name = metadata[
"fluka_name"].asString();
14078 std::cerr <<
"Error: metadata \"fluka_name\" expected." << std::endl;
14079 compound_name =
"NotFound";
14081 ss << fluka_material_line(znum, atomic_mass,
id, compound_name);
14083 std::string frac_sign;
14084 if (
"atom" == frac_type) {
14090 std::stringstream temp_s;
14091 temp_s << std::scientific;
14092 temp_s << std::setprecision(3);
14094 int counter = comp.size();
14097 while (counter >= 3) {
14098 ss << std::setw(10) << std::left <<
"COMPOUND";
14100 temp_s << frac_sign << nuc->second;
14102 ss << std::setw(10) << std::right << temp_s.str();
14103 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
14107 temp_s << frac_sign << nuc->second;
14108 ss << std::setw(10) << std::right << temp_s.str();
14109 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
14113 temp_s << frac_sign << nuc->second;
14114 ss << std::setw(10) << std::right << temp_s.str();
14115 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
14119 ss << std::setw(10) << std::left << compound_name;
14126 if (nuc != comp.end()) {
14127 ss << std::setw(10) << std::left <<
"COMPOUND";
14128 temp_s << frac_sign << nuc->second;
14129 ss << std::setw(10) << std::right << temp_s.str();
14130 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
14134 if (nuc != comp.end()) {
14135 temp_s << frac_sign << nuc->second;
14136 ss << std::setw(10) << std::right << temp_s.str();
14137 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
14141 ss << std::setw(10) << std::right <<
"";
14142 ss << std::setw(10) << std::right <<
"";
14145 ss << std::setw(10) << std::right <<
"";
14146 ss << std::setw(10) << std::right <<
"";
14147 ss << std::setw(10) << std::left << compound_name;
14155 std::string fname (filename);
14167 f.open(filename.c_str());
14171 std::string keystr, valstr;
14173 while ( !f.eof() ) {
14176 if (0 == keystr.length())
14179 if (keystr ==
"Mass"){
14182 }
else if (keystr ==
"Density") {
14185 }
else if (keystr ==
"APerM") {
14192 getline(f, valstr);
14193 valstr= valstr.substr(0, valstr.length()-1);
14194 metadata[keystr]= valstr;
14206 std::string fname (filename);
14213 f.open(filename.c_str(), std::ios_base::trunc);
14216 std::vector<std::string> obj = metadata.getMemberNames();
14219 f <<
"Mass " << mass <<
"\n";
14222 f <<
"Density " << density <<
"\n";
14224 if (0 <= atoms_per_molecule)
14225 f <<
"APerM " << atoms_per_molecule <<
"\n";
14227 for (
int i=0; i < metadata.size(); i=i+2){
14228 f <<metadata.get(obj.at(i),
"") << metadata.get(obj.at(i+1),
"");
14231 std::string nuc_name;
14234 while (nuc_name.length() < 8)
14236 f << nuc_name << i->second <<
"\n";
14245 Json::Value::Members::const_iterator ikey = keys.begin();
14246 Json::Value::Members::const_iterator ikey_end = keys.end();
14248 for (; ikey != ikey_end; ++ikey)
14252 density = json[
"density"].
asDouble();
14253 atoms_per_molecule = json[
"atoms_per_molecule"].
asDouble();
14254 metadata = json[
"metadata"];
14261 json[
"mass"] = mass;
14262 json[
"density"] = density;
14263 json[
"atoms_per_molecule"] = atoms_per_molecule;
14264 json[
"metadata"] = metadata;
14265 for(
comp_iter i = comp.begin(); i != comp.end(); i++)
14267 json[
"comp"] = jcomp;
14273 std::string fname (filename);
14281 std::ifstream f (filename.c_str(),
std::ios::in | std::ios::binary);
14282 f.seekg(0, std::ios::end);
14283 s.resize(f.tellg());
14284 f.seekg(0, std::ios::beg);
14285 f.read(&s[0], s.size());
14289 reader.
parse(s, json);
14295 std::string fname (filename);
14302 std::string s = writer.
write(json);
14304 f.open(filename.c_str(), std::ios_base::trunc);
14320 atoms_per_molecule = -1.0;
14331 atoms_per_molecule = apm;
14332 metadata = attributes;
14343 atoms_per_molecule = apm;
14344 metadata = attributes;
14347 std::string fname (filename);
14352 bool ish5 = H5Fis_hdf5(fname.c_str());
14365 atoms_per_molecule = apm;
14366 metadata = attributes;
14373 bool ish5 = H5Fis_hdf5(filename.c_str());
14375 from_hdf5(filename);
14377 from_text(filename);
14391 os <<
"\tMass: " << mat.
mass <<
"\n";
14392 os <<
"\t---------\n";
14418 cm[i->first] = (i->second) * mass;
14429 act[i->first] = masspermole * (i->second) *
decay_const(i->first) /
\
14450 const double pCi_per_Bq = 27.027027;
14451 if (dose_type ==
"ext_air") {
14457 }
else if (dose_type ==
"ext_soil") {
14463 }
else if (dose_type ==
"ingest") {
14465 dose[i->first] = pCi_per_Bq *
pyne::N_A * (i->second) * \
14469 }
else if (dose_type ==
"inhale") {
14471 dose[i->first] = pCi_per_Bq *
pyne::N_A * (i->second) * \
14476 throw std::invalid_argument(
"Dose type must be one of: ext_air, ext_soil, ingest, inhale.");
14484 double inverseA = 0.0;
14489 if (inverseA == 0.0)
14493 double atsperm = 1.0;
14496 if (atoms_per_molecule < 0.0)
14497 atoms_per_molecule = apm;
14498 }
else if (0.0 <= atoms_per_molecule)
14499 atsperm = atoms_per_molecule;
14501 return atsperm / inverseA;
14509 int n, nabund, znuc, zabund;
14511 std::map<int, double>::iterator abund_itr, abund_end;
14517 for (
comp_iter nuc = comp.begin(); nuc != comp.end(); nuc++) {
14518 if(abund_itr == abund_end)
14519 newcomp.insert(*nuc);
14523 if (znuc < zabund) {
14524 newcomp.insert(*nuc);
14527 while(zabund <= znuc) {
14528 nabund = (*abund_itr).first;
14529 if (zabund == znuc && 0 !=
nucname::anum(nabund) && 0.0 != (*abund_itr).second)
14530 newcomp[nabund] = (*abund_itr).second * (*nuc).second *
\
14532 else if (n == nabund && 0.0 == (*abund_itr).second)
14533 newcomp.insert(*nuc);
14535 if (abund_itr == abund_end) {
14542 newcomp.insert(*nuc);
14544 return Material(newcomp, mass, density, atoms_per_molecule, metadata);
14568 if (0 < ptr->second) {
14573 if (0 < exception_ids.count(cur_stripped_id)) {
14576 cm[ptr->first] = (ptr->second) * mass;
14580 cm[znum_id] += (ptr->second) * mass;
14586 atoms_per_molecule, metadata);
14592 std::set<int> nucvec;
14594 int *int_ptr = *int_ptr_arry;
14595 while (int_ptr != NULL)
14597 nucvec.insert(*int_ptr);
14600 return collapse_elements(nucvec);
14604 if (0.0 <= num_dens) {
14605 double mw = molecular_mass(apm);
14606 density = num_dens * mw /
pyne::N_A / atoms_per_molecule;
14613 if (0 <= mass_dens)
14614 density = mass_dens;
14615 double mw = molecular_mass(apm);
14616 double num_dens = density *
pyne::N_A * atoms_per_molecule / mw;
14629 if ( 0 < nucset.count(i->first) )
14630 cm[i->first] = (i->second) * mass;
14641 std::set<int> iset;
14642 for (std::set<std::string>::iterator i = nucset.begin(); i != nucset.end(); i++) {
14646 return sub_mat(iset);
14660 if ( 0 == nucset.count(i->first) )
14661 cm[i->first] = (i->second) * mass;
14665 for (std::set<int>::iterator nuc = nucset.begin(); nuc != nucset.end(); nuc++)
14676 std::set<int> iset;
14677 for (std::set<std::string>::iterator i = nucset.begin(); i != nucset.end(); i++) {
14681 return set_mat(iset, value);
14695 if ( 0 == nucset.count(i->first) )
14696 cm[i->first] = (i->second) * mass;
14707 std::set<int> iset;
14708 for (std::set<std::string>::iterator i = nucset.begin(); i != nucset.end(); i++) {
14712 return del_mat(iset);
14724 int temp_upper = upper;
14726 lower = temp_upper;
14731 if ((lower <= (i->first)) && ((i->first) < upper))
14732 cm[i->first] = (i->second) * mass;
14742 if (upper < lower) {
14743 int temp_upper = upper;
14745 lower = temp_upper;
14750 if ((lower <= (i->first)) && ((i->first) < upper))
14751 cm[i->first] = value;
14753 cm[i->first] = (i->second) * mass;
14763 if (upper < lower) {
14764 int temp_upper = upper;
14766 lower = temp_upper;
14771 if ((upper <= (i->first)) || ((i->first) < lower))
14772 cm[i->first] = (i->second) * mass;
14789 return sub_range(elem, elem + 10000000);
14796 return sub_range(570000000, 720000000);
14803 return sub_range(890000000, 1040000000);
14809 return sub_range(930000000, INT_MAX);
14816 return sub_range(930000000, 1040000000).
del_range(940000000, 950000000);
14823 return sub_range(0, 890000000);
14834 double mat_mw = molecular_mass();
14836 std::map<int, double> atom_fracs = std::map<int, double>();
14838 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++)
14852 atoms_per_molecule = 0.0;
14854 for (std::map<int, double>::iterator afi = atom_fracs.begin(); afi != atom_fracs.end(); afi++) {
14856 atoms_per_molecule += (afi->second);
14867 std::map<int, double> atom_dens = std::map<int, double>();
14869 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++)
14877 std::vector<std::pair<double, double> > result;
14878 std::map<int, double> atom_fracs = this->to_atom_frac();
14880 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++) {
14881 if (ci->first % 10000 > 0)
14884 state_id = ci->first;
14886 std::vector<std::pair<double, double> > raw_gammas =
pyne::gammas(state_id);
14887 for (
int i = 0; i < raw_gammas.size(); ++i) {
14888 result.push_back(std::make_pair(raw_gammas[i].first,
14889 atom_fracs[ci->first]*raw_gammas[i].second));
14896 std::vector<std::pair<double, double> > result;
14897 std::map<int, double> atom_fracs = this->to_atom_frac();
14899 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++) {
14900 if (ci->first % 10000 > 0)
14903 state_id = ci->first;
14905 std::vector<std::pair<double, double> > raw_xrays =
pyne::xrays(state_id);
14906 for (
int i = 0; i < raw_xrays.size(); ++i) {
14907 result.push_back(std::make_pair(raw_xrays[i].first,
14908 atom_fracs[ci->first]*raw_xrays[i].second));
14915 std::vector<std::pair<double, double> > txray = this->
xrays();
14916 std::vector<std::pair<double, double> > tgammas = this->
gammas();
14917 for (
int i = 0; i < txray.size(); ++i)
14918 tgammas.push_back(txray[i]);
14920 tgammas = normalize_radioactivity(tgammas);
14925 std::vector<std::pair<double, double> > unnormed) {
14926 std::vector<std::pair<double, double> > normed;
14928 for (
int i = 0; i < unnormed.size(); ++i) {
14929 if (!isnan(unnormed[i].second))
14930 sum = sum + unnormed[i].second;
14932 for (
int i = 0; i < unnormed.size(); ++i) {
14933 if (!isnan(unnormed[i].second)) {
14934 normed.push_back(std::make_pair(unnormed[i].first,
14935 (unnormed[i].second)/sum));
14965 if ( 0 < ywgt.count(i->first) )
14966 cm[i->first] = xwgt[i->first] + ywgt[i->first];
14968 cm[i->first] = xwgt[i->first];
14972 if ( 0 == cm.count(i->first) )
14973 cm[i->first] = ywgt[i->first];
15001 #ifndef PYNE_IS_AMALGAMATED
15002 #include "enrichment_cascade.h"
15005 namespace pyne_enr = pyne::enrichment;
15028 l_t_per_feed = 0.0;
15040 x_feed_j = mat_feed.comp[j];
15041 x_prod_j = mat_prod.comp[j];
15042 x_tail_j = mat_tail.comp[j];
15054 #ifndef PYNE_IS_AMALGAMATED
15058 namespace pyne_enr = pyne::enrichment;
15078 cm[922340000] = 0.000055;
15079 cm[922350000] = 0.00720;
15080 cm[922380000] = 0.992745;
15102 return (x_feed - x_tail) / (x_prod - x_tail);
15106 return (x_feed - x_prod) / (x_tail - x_prod);
15110 return (x_feed - x_prod) / (x_tail - x_feed);
15114 return (2 * x - 1) * log(x / (1 - x));
15141 return pow(alpha, (Mstar - M_i));
15154 double origN = casc.
N;
15155 double origM = casc.
M;
15158 double rhs_prod = (pow(astar_j, M+1.0) - 1.0) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
15160 double rhs_tail = (1.0 - pow(astar_j, -N)) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
15163 double delta_prod = lhs_prod - rhs_prod;
15164 double delta_tail = lhs_tail - rhs_tail;
15165 while (tolerance < fabs(delta_prod) && tolerance < fabs(delta_tail)) {
15166 delta_prod = lhs_prod - rhs_prod;
15167 delta_tail = lhs_tail - rhs_tail;
15169 if (tolerance < fabs(delta_prod)) {
15170 N = N - (delta_prod * N);
15171 rhs_prod = (pow(astar_j, M+1.0) - 1.0) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
15174 if (tolerance < fabs(delta_tail)) {
15175 M = M - (delta_tail * M);
15176 rhs_tail = (1.0 - pow(astar_j, -N)) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
15179 if (N < tolerance) {
15185 if (M < tolerance) {
15209 double astar_i, numer_prod, numer_tail, denom_prod, denom_tail;
15222 numer_prod = casc.
mat_feed.
comp[nuc] * (pow(astar_i, M+1.0) - 1.0);
15223 denom_prod = (pow(astar_i, M+1.0) - pow(astar_i, -N)) / ppf;
15224 comp_prod[nuc] = numer_prod / denom_prod;
15227 numer_tail = casc.
mat_feed.
comp[nuc] * (1.0 - pow(astar_i, -N));
15228 denom_tail = (pow(astar_i, M+1.0) - pow(astar_i, -N)) / tpf;
15229 comp_tail[nuc] = numer_tail / denom_tail;
15240 double tolerance,
int max_iter) {
15253 int max_hist = max_iter / 10;
15254 std::vector<double> historyN;
15255 std::vector<double> historyM;
15258 prev_casc.
N += 1.0;
15259 prev_casc.
M += 1.0;
15262 historyN.push_back(prev_casc.
N);
15263 historyM.push_back(prev_casc.
M);
15269 historyN.push_back(curr_casc.
N);
15270 historyM.push_back(curr_casc.
M);
15275 double prev_N = prev_casc.
N;
15276 double prev_M = prev_casc.
M;
15277 double curr_N = curr_casc.
N;
15278 double curr_M = curr_casc.
M;
15279 double temp_prev_N = 0.0;
15280 double temp_prev_M = 0.0;
15281 double temp_curr_N = 0.0;
15282 double temp_curr_M = 0.0;
15287 while ((tolerance < fabs(delta_x_prod_j) / curr_casc.
mat_prod.
comp[j] || \
15288 tolerance < fabs(delta_x_tail_j) / curr_casc.
mat_tail.
comp[j]) && \
15289 niter < max_iter) {
15293 if (tolerance <= fabs(delta_x_prod_j)/curr_casc.
mat_prod.
comp[j]) {
15295 temp_curr_N = curr_N;
15296 temp_prev_N = prev_N;
15297 curr_N = curr_N + delta_x_prod_j*\
15299 prev_N = temp_curr_N;
15303 curr_N = (temp_curr_N + temp_prev_N)/2.0;
15306 if (tolerance <= fabs(delta_x_tail_j)/curr_casc.
mat_tail.
comp[j]) {
15308 temp_curr_M = curr_M;
15309 temp_prev_M = prev_M;
15310 curr_M = curr_M + delta_x_tail_j*\
15312 prev_M = temp_curr_M;
15316 curr_M = (temp_curr_M + temp_prev_M)/2.0;
15320 for (h = 0; h < historyN.size(); h++) {
15321 if (historyN[h] == curr_N && historyM[h] == curr_M) {
15322 curr_N = curr_N + delta_x_prod_j * \
15324 curr_M = curr_M + delta_x_tail_j * \
15330 if (max_hist <= historyN.size()) {
15331 historyN.erase(historyN.begin());
15332 historyM.erase(historyM.begin());
15334 historyN.push_back(curr_N);
15335 historyM.push_back(curr_M);
15340 prev_casc = curr_casc;
15341 curr_casc.
N = curr_N;
15342 curr_casc.
M = curr_M;
15362 ((astar_i - 1.0)/(astar_i + 1.0));
15367 double tolerance,
int max_iter) {
15384 double ltotpf = 0.0;
15385 double swupf = 0.0;
15386 double temp_numer = 0.0;
15390 temp_numer = (ppf*casc.
mat_prod.
comp[nuc]*log(rprod) + \
15392 casc.mat_feed.comp[nuc]*log(rfeed));
15394 swupf = swupf + temp_numer;
15414 char * solver,
double tolerance,
int max_iter) {
15415 std::string strsolver(solver);
15416 return multicomponent(orig_casc, strsolver, tolerance, max_iter);
15420 std::string solver,
double tolerance,
int max_iter) {
15430 if (solver ==
"symbolic")
15432 else if (solver ==
"numeric")
15435 throw "solver not known: " + solver;
15443 prev_casc.
Mstar = ms;
15444 curr_casc.
Mstar = ms;
15448 double ooe = -log10(tolerance);
15452 switch (solver_code) {
15463 switch (solver_code) {
15474 double m_sign = m / fabs(m);
15477 double temp_m_sign;
15485 prev_casc = curr_casc;
15487 curr_casc.
Mstar = curr_casc.
Mstar - (m_sign * pow(10.0, -xpn));
15488 switch (solver_code) {
15498 temp_casc = curr_casc;
15499 temp_casc.
Mstar = temp_casc.
Mstar - (m_sign * pow(10.0, -xpn));
15500 switch (solver_code) {
15511 if (temp_m == 0.0) {
15512 prev_casc = curr_casc;
15513 curr_casc = temp_casc;
15517 temp_m_sign = temp_m / fabs(temp_m);
15518 if (m_sign != temp_m_sign) {
15521 temp_casc = prev_casc;
15522 temp_casc.
Mstar = temp_casc.
Mstar + (m_sign * pow(10.0, -xpn));
15523 switch (solver_code) {
15534 if (temp_m == 0.0) {
15535 prev_casc = curr_casc;
15536 curr_casc = temp_casc;
15540 m_sign = temp_m / fabs(temp_m);
15542 prev_casc = curr_casc;
15543 curr_casc = temp_casc;
15564 #ifndef PYNE_IS_AMALGAMATED
15565 #include "enrichment_symbolic.h"
15574 double NP0 = casc.
N;
15576 double Mstar = casc.
Mstar;
15581 double LpF = -1.0, PpF = -1.0, TpF = -1.0,
15582 SWUpF = -1.0, SWUpP = -1.0,
15583 NP_b = -1.0, NP_sqrt_base = -1.0, NP_2a = -1.0,
15584 NP1 = -1.0, NT1 = -1.0;
15585 double * MW =
new double [ncomp];
15586 double * xP =
new double [ncomp];
15587 double * xF =
new double [ncomp];
15588 double * xT =
new double [ncomp];
16599 if (nuc == j || nuc == k)
16602 xF[i] = (*ci).second;
16609 n0 = -2.00000000000000;
16610 n1 = MW[0] - Mstar;
16614 n5 = MW[1] - Mstar;
16615 n6 = MW[2] - Mstar;
16622 n13 = pow(n1, -n0);
16623 n14 = pow(n2, -n0);
16624 n15 = pow(n5, -n0);
16625 n16 = pow(n6, -n0);
16629 n20 = pow(alpha, NP0*n1);
16630 n21 = n11*xF[0] + n9;
16631 n22 = n11*xPj + n9;
16632 n23 = pow(alpha, NP0*n5);
16633 n24 = pow(alpha, NP0*n6);
16639 n30 = pow(alpha, n1*n12);
16640 n31 = pow(n22, -n0);
16650 n41 = log((-1.0 + xPj/xF[0])/n3);
16658 n49 = n17 + n25 + n41 + n7;
16659 n50 = n36*(n49 - log(n48)) + 1;
16660 n51 = pow(alpha, n1*n50);
16661 n52 = pow(alpha, n5*n50);
16662 n53 = pow(alpha, n50*n6);
16663 n54 = n28 - 1 + 1.0/n51;
16664 n55 = n29 - 1 + 1.0/n52;
16665 n56 = n32 - 1 + 1.0/n53;
16672 n63 = n2*n38*xF[1]/n55;
16674 n65 = n46*xF[0]/n54;
16675 n66 = n14*n15*n23*xF[1]/n55;
16677 n68 = n19*n26*n42/n54;
16678 n69 = n20*n5/(n48*n52);
16679 n70 = n20*n6/(n48*n53);
16685 n76 = pow(n21, n8)*n30*n31*pow(n48, n8)/n53;
16686 n77 = pow(n21, n8)*n30*n31*pow(n48, n8)/n52;
16687 n78 = n2*n39*n44*n64 + n2*n39;
16688 n79 = n2*n38 + n2*n44*n69;
16689 n80 = n2*n37 + n2*n44*n70;
16690 n81 = pow(n78, -n0);
16691 n82 = pow(n79, -n0);
16692 n83 = pow(n80, -n0);
16694 n85 = n18*n39*n44*n64 + n18*n39;
16695 n86 = n44*n46*n64 + n46;
16696 n87 = pow(n54, n8)*n78;
16697 n88 = pow(n55, n8)*n79;
16698 n89 = n29*n82*xF[1]/n58;
16699 n90 = n40*pow(n54, n8)*n86;
16700 n91 = -n26*n40*n87;
16701 n92 = n18*n26*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39);
16702 n93 = n18*n26*n38*pow(n55, n8)*xF[1]*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38);
16703 n94 = n18*n26*n37*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37);
16704 n95 = 1.0*n2*n26*n42*n87;
16706 n97 = -0.5*n26*n90;
16709 n100 = n14*n15*n23 + n15*n27*n77 + n35*n44*n69 + n35*n5*n77;
16710 n101 = n16*n27*n76 + n35*n44*n70 + n35*n6*n76 + n45;
16711 n102 = n26*n43*pow(n55, n8)*(pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23 + n35*n44*n69);
16712 n103 = n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n35*n44*n70 + n45);
16713 n104 = n74 + n95 + n97;
16714 n105 = n2*n26*n37*n60 + n26*n33*pow(n56, n8)*n84 + n26*n43*n88 + n26*n63 + n99;
16715 n106 = n102 + n103 + n71 + n72 + n73 + n92 + n93 + n94 + n96;
16716 n107 = n106 + n26*n33*n84*(n18*n37 + n18*n44*n70)/n59 + n26*n43*n79*(n18*n38 + n18*n44*n69)/n58 + n26*n62*n98;
16717 NP_b = -n12*(1.0*n2*n26*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) - 0.5*n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) - 1.0*n26*n62*n81 + n74 - 0.5*xTj*(n26*n32*n8*n83*xF[2]/n59 + n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n35*n44*n6/n48 + pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n45) - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n35*n44*n5/n48 + pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23) + n26*n62*n8*n81 + n26*n8*n89 + n71 + n72 + n73 + n92 + n93 + n94)) - n2*n26*n39*n40*pow(n54, n8)*n75 - n26*xTj*(n2*n37*n60 + n33*pow(n56, n8)*n84 - n40*n87 + n42*n61 + n43*n88 + n63) - n68;
16718 NP_2a = -n26*(n0*n13*n27*n30*n62*pow(n75, -n0) + n0*n47*pow(n54, n8)*n75*xF[0] + n40*n46*pow(n54, n8)*n75 - 1.0*n65 + 1.0*xTj*(n18*n37*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37) + n18*n38*pow(n55, n8)*xF[1]*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38) + n18*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n32*n8*n83*xF[2]/n59 + n33*pow(n56, n8)*xF[2]*(pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n35*n44*n70 + n45) + n43*pow(n55, n8)*(pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23 + n35*n44*n69) + n45*n60 + n62*n8*n81 + n65 + n66 + n8*n89 - n90));
16719 NP_sqrt_base = (NP0*(n11*(n2*n26*n37*n60 + n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37) - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38) + n26*n63 + n67) + n99) + n26*n40/n54 + xTj*(n26*n33*n60 - n26*n40/n54 + n26*n43/n55) + pow(NP0, -n0)*(0.5*n107*xTj - 1.0*n2*n26*n42*n87 + 0.5*n26*n62*n78*n85 + 0.5*n26*n90 - 0.5*n71))*(-n0*n11*(n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n35*n44*n6/n48 + pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n45) + n26*n33*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n18*n44*n6/n48 + n18*n37)*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37)/n59 - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n35*n44*n5/n48 + pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23) + n26*n43*(pow(alpha, NP0*n1 - n5*n50)*n18*n44*n5/n48 + n18*n38)*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38)/n58 - n26*n62*(pow(alpha, NP0*n1 - n1*n50)*n1*n18*n44/n48 + n18*n39)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n71 + n72 + n73 + n92 + n93 + n94) - n0*n71 - n0*n96 + 4.0*n2*n26*n42*n87 - 4.0*n26*n62*n81) + pow(-n105*xTj - n12*(1.0*n2*n26*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) - 0.5*n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) - 0.5*n26*n62*(pow(alpha, NP0*n1 - n1*n50)*n1*n18*n44/n48 + n18*n39)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n74 - 0.5*xTj*(n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n35*n44*n6/n48 + pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n45) + n26*n33*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n18*n44*n6/n48 + n18*n37)*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37)/n59 - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n35*n44*n5/n48 + pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23) + n26*n43*(pow(alpha, NP0*n1 - n5*n50)*n18*n44*n5/n48 + n18*n38)*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38)/n58 - n26*n62*(pow(alpha, NP0*n1 - n1*n50)*n1*n18*n44/n48 + n18*n39)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n71 + n72 + n73 + n92 + n93 + n94)) - n26*n40*n87 - n68, -n0);
16720 NP_sqrt_base = fabs(NP_sqrt_base);
16721 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
16722 NT1 = n36*(n49 - log(-pow(alpha, NP1*n1)*n44 + 1));
16723 g0 = MW[1] - Mstar;
16724 g1 = MW[0] - Mstar;
16727 g4 = MW[2] - Mstar;
16732 g9 = pow(alpha, -g1);
16733 g10 = pow(alpha, -g0);
16734 g11 = pow(alpha, -g4);
16735 g12 = log(xF[0]/xF[1]);
16737 g14 = pow(alpha, NP1*g0);
16738 g15 = pow(alpha, NP1*g1);
16740 g17 = pow(alpha, NP1*g4);
16752 g29 = pow(alpha, g0*g13) - 1;
16753 g30 = pow(alpha, g0*g13) - 1;
16754 g31 = pow(alpha, g1*g13) - 1;
16755 g32 = pow(alpha, g13*g4) - 1;
16756 g33 = -pow(alpha, g1*g13);
16757 g34 = -pow(alpha, g13*g4);
16758 g35 = g6*g7/(g3*xF[1]);
16762 g39 = pow(alpha, g1*g13) + g25;
16764 g41 = pow(alpha, g13*g4) + g26;
16777 g54 = log(g35*g40/g22);
16778 g55 = log(g35*g36/g21);
16779 g56 = log(g20*g40*g8/g30);
16781 g58 = log(g20*g36*g8/g29);
16783 g60 = -g22*g42*g57 - g27*xF[0] - g27*xF[1] - g27*xF[2] - g30*g42*g59 - g43*g57*(g26 + 1) - g43*g59*(pow(alpha, g13*g4) - 1) - g44*g57*(g25 + 1) - g44*g59*(pow(alpha, g1*g13) - 1);
16784 LpF = xF[0]*(g9 + 1.0)*(g18 + g48*g55 + g53*g58)/(g16*(g9 - 1.0)) + xF[1]*(g10 + 1.0)*(g18 + g49*g55 + g52*g58)/(g16*(g10 - 1.0)) + xF[2]*(g11 + 1.0)*(g18 + g50*g55 + g51*g58)/(g16*(g11 - 1.0));
16789 xP[0] = g19*g31*g47;
16790 xP[1] = g19*g29*g46;
16791 xP[2] = g19*g32*g45;
16792 xT[0] = g23*g28*g47;
16793 xT[1] = g21*g28*g46;
16794 xT[2] = g24*g28*g45;
16797 n0 = -0.500000000000000;
16798 n1 = MW[0] - Mstar;
16802 n5 = MW[1] - Mstar;
16803 n6 = MW[2] - Mstar;
16804 n7 = MW[3] - Mstar;
16813 n16 = pow(n1, -n9);
16814 n17 = pow(n2, -n9);
16815 n18 = pow(n5, -n9);
16816 n19 = pow(n6, -n9);
16817 n20 = pow(n7, -n9);
16820 n23 = pow(alpha, NP0*n1);
16821 n24 = n10 + n12*xTj;
16822 n25 = n10 + n13*xTj;
16823 n26 = pow(alpha, NP0*n5);
16824 n27 = pow(alpha, NP0*n6);
16825 n28 = pow(alpha, NP0*n7);
16830 n33 = pow(alpha, n1*n14);
16831 n34 = pow(n24, -n9);
16832 n35 = pow(n25, -n9);
16847 n50 = log((-1.0 + xPj/xF[0])/n3);
16853 n56 = pow(n55, -n9);
16854 n57 = n21 + n29 + n50 + n8;
16856 n59 = n17*n33*n35/(n34*n56);
16857 n60 = n41*(n57 - log(n55)) + 1;
16858 n61 = pow(alpha, n1*n60);
16859 n62 = pow(alpha, n5*n60);
16860 n63 = pow(alpha, n6*n60);
16861 n64 = pow(alpha, n60*n7);
16865 n68 = n31 - 1 + 1.0/n61;
16866 n69 = n32 - 1 + 1.0/n62;
16867 n70 = n36 - 1 + 1.0/n63;
16868 n71 = n37 - 1 + 1.0/n64;
16869 n72 = pow(n68, -n9);
16870 n73 = pow(n69, -n9);
16871 n74 = pow(n70, -n9);
16872 n75 = pow(n71, -n9);
16882 n85 = n31*xF[0]/n76;
16884 n87 = n2*n48*xF[1]/n69;
16885 n88 = n53*xF[0]/n68;
16886 n89 = n17*n18*n26*xF[1]/n69;
16887 n90 = n12*n30*n46*n82;
16892 n95 = n0*n12*n30*n53/n68;
16893 n96 = n51/(n55*n61) + 1;
16895 n98 = n2*n46*n51/(n55*n61) + n2*n46;
16896 n99 = n2*n48 + n2*n58*n65;
16897 n100 = n2*n43 + n2*n58*n67;
16898 n101 = n2*n45 + n2*n58*n66;
16899 n102 = pow(n98, -n9);
16900 n103 = pow(n99, -n9);
16901 n104 = pow(n100, -n9);
16902 n105 = pow(n101, -n9);
16904 n107 = n22*n46*n51/(n55*n61) + n22*n46;
16906 n109 = n51*n53/(n55*n61) + n53;
16908 n111 = n105*n9/n79;
16909 n112 = n30*n31*n83*n98;
16910 n113 = n12*n2*n30*n46*n9*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72;
16911 n114 = n22*n30*n48*xF[1]*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)/n73;
16912 n115 = n22*n30*n43*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)/n74;
16913 n116 = n22*n30*n45*xF[3]*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)/n75;
16914 n117 = 1.0*n108*n30*n46*n83;
16915 n118 = n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53)/n72;
16916 n119 = n0*n109*n30*n31*n83;
16917 n120 = n17*n18*n26 - n18*n59/n62 + n33*n35*n42*n65/(n34*n56) + n42*n58*n65;
16918 n121 = -n19*n59/n63 + n33*n35*n42*n67/(n34*n56) + n42*n58*n67 + n52;
16919 n122 = -n30*n47*(-pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26 + n42*n58*n65)/n73;
16920 n123 = n30*n38*xF[2]*(-pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n42*n58*n67 + n52)/n74;
16921 n124 = n30*n86*(-pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n42*n58*n66 + n54);
16922 n125 = xTj*(n101*n30*n86 + n106*n30*n38/n74 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72 + n2*n30*n43*n80 + n30*n45*n84 + n30*n46*n82*xF[0] - n30*n47*n99/n73 + n30*n87);
16923 n126 = n112 + n125 + n90;
16924 n127 = n113 + n114 + n115 + n116 + n118 + n122 + n123 + n124 + n91 + n92 + n93 + n94;
16925 n128 = -n101*n30*n44*(n22*n45 + n22*n58*n66)/n79 + n106*n30*n38*(n22*n43 + n22*n58*n67)/n78 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n127 - n30*n47*n99*(n22*n48 + n22*n58*n65)/n77;
16926 NP_b = -n14*(n0*n30*n31*n83*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53) + n0*xTj*(n102*n30*n85*n9 + n104*n30*n36*n9*xF[2]/n78 + n110*n30*n47*n9 + n111*n30*n44 + n113 + n114 + n115 + n116 + n118 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) - 1.0*n102*n30*n85 + 1.0*n2*n30*n46*n83*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46) + n95) - n2*n30*n46*n83*n97 - n30*xTj*(n101*n86 + n106*n38/n74 + n12*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72 + n2*n43*n80 + n45*n84 + n46*n82*xF[0] - n47*n99/n73 + n87) - n90;
16927 NP_2a = -n30*(n12*n31*n33*n49*n9*pow(n96, -n9)/n76 - 2.0*n33*n49*n83*n96 + n53*n83*n97 - 1.0*n88 + 1.0*xTj*(n102*n85*n9 + n104*n36*n9*xF[2]/n78 + n110*n47*n9 + n111*n44 + n12*n2*n46*n9*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72 + n12*n31*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53)/n72 + n22*n43*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)/n74 + n22*n45*xF[3]*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)/n75 + n22*n48*xF[1]*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)/n73 + n38*xF[2]*(-pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n42*n58*n67 + n52)/n74 - n47*(-pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26 + n42*n58*n65)/n73 + n52*n80 + n54*n81 + n86*(-pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n42*n58*n66 + n54) + n88 + n89));
16928 NP_sqrt_base = (-NP0*n126 - n12*n30*n31/(n31 - 1 + pow(alpha, -n1*(n41*(n57 - log(n25*n39/(n10 + n15*xF[0]) + 1)) + 1))) - n15*(-n30*n31*xF[0]/n68 - n30*n36*n80 - n30*n44/n71 - n30*n47/n69) - pow(NP0, -n9)*(-n0*n118 - n0*n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 - n0*n15*(n113 + n114 + n115 + n116 + n118 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)*(pow(alpha, NP0*n1 - n6*n60)*n22*n51*n6/n55 + n22*n43)/n78 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n44*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)*(pow(alpha, NP0*n1 - n60*n7)*n22*n51*n7/n55 + n22*n45)/n79 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)*(pow(alpha, NP0*n1 - n5*n60)*n22*n5*n51/n55 + n22*n48)/n77 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) - n0*n91 + 1.0*n108*n30*n46*n83))*(-4.0*n102*n30*n85 + 4.0*n108*n30*n46*n83 - n118*n9 - n15*n9*(n113 + n114 + n115 + n116 + n118 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)*(pow(alpha, NP0*n1 - n6*n60)*n22*n51*n6/n55 + n22*n43)/n78 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n44*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)*(pow(alpha, NP0*n1 - n60*n7)*n22*n51*n7/n55 + n22*n45)/n79 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)*(pow(alpha, NP0*n1 - n5*n60)*n22*n5*n51/n55 + n22*n48)/n77 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) + 2.0*n91) + pow(-n126 - n14*(n0*n30*n31*n83*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53) + n0*n30*n85*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46) + n0*xTj*(n113 + n114 + n115 + n116 + n118 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)*(pow(alpha, NP0*n1 - n6*n60)*n22*n51*n6/n55 + n22*n43)/n78 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n44*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)*(pow(alpha, NP0*n1 - n60*n7)*n22*n51*n7/n55 + n22*n45)/n79 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)*(pow(alpha, NP0*n1 - n5*n60)*n22*n5*n51/n55 + n22*n48)/n77 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) + 1.0*n2*n30*n46*n83*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46) + n95), -n9);
16929 NP_sqrt_base = fabs(NP_sqrt_base);
16930 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
16931 NT1 = n41*(n57 - log(-pow(alpha, NP1*n1)*n51 + 1));
16932 g0 = MW[1] - Mstar;
16933 g1 = MW[0] - Mstar;
16936 g4 = MW[2] - Mstar;
16937 g5 = MW[3] - Mstar;
16942 g10 = pow(alpha, -g1);
16943 g11 = pow(alpha, -g0);
16944 g12 = pow(alpha, -g4);
16945 g13 = pow(alpha, -g5);
16946 g14 = log(xF[0]/xF[1]);
16948 g16 = pow(alpha, NP1*g0);
16949 g17 = pow(alpha, NP1*g1);
16951 g19 = pow(alpha, NP1*g4);
16952 g20 = pow(alpha, NP1*g5);
16966 g34 = pow(alpha, g0*g15) - 1;
16967 g35 = pow(alpha, g0*g15) - 1;
16968 g36 = pow(alpha, g1*g15) - 1;
16969 g37 = pow(alpha, g15*g4) - 1;
16970 g38 = pow(alpha, g15*g5) - 1;
16971 g39 = -pow(alpha, g1*g15);
16972 g40 = -pow(alpha, g15*g4);
16973 g41 = -pow(alpha, g15*g5);
16974 g42 = g7*g8/(g3*xF[1]);
16979 g47 = pow(alpha, g1*g15) + g29;
16981 g49 = pow(alpha, g15*g4) + g30;
16982 g50 = pow(alpha, g15*g5) + g31;
16999 g67 = log(g42*g48/g25);
17000 g68 = log(g42*g43/g24);
17001 g69 = log(g23*g48*g9/g35);
17003 g71 = log(g23*g43*g9/g34);
17005 g73 = -g25*g52*g70 - g32*xF[0] - g32*xF[1] - g32*xF[2] - g32*xF[3] - g35*g52*g72 - g51*g70*(g29 + 1) - g51*g72*(pow(alpha, g1*g15) - 1) - g53*g70*(g31 + 1) - g53*g72*(pow(alpha, g15*g5) - 1) - g54*g70*(g30 + 1) - g54*g72*(pow(alpha, g15*g4) - 1);
17006 LpF = xF[0]*(g10 + 1.0)*(g21 + g59*g68 + g65*g71)/(g18*(g10 - 1.0)) + xF[1]*(g11 + 1.0)*(g21 + g61*g68 + g63*g71)/(g18*(g11 - 1.0)) + xF[2]*(g12 + 1.0)*(g21 + g62*g68 + g64*g71)/(g18*(g12 - 1.0)) + xF[3]*(g13 + 1.0)*(g21 + g60*g68 + g66*g71)/(g18*(g13 - 1.0));
17011 xP[0] = g22*g36*g56;
17012 xP[1] = g22*g34*g55;
17013 xP[2] = g22*g37*g58;
17014 xP[3] = g22*g38*g57;
17015 xT[0] = g26*g33*g56;
17016 xT[1] = g24*g33*g55;
17017 xT[2] = g27*g33*g58;
17018 xT[3] = g28*g33*g57;
17021 n0 = MW[0] - Mstar;
17025 n4 = MW[1] - Mstar;
17026 n5 = MW[2] - Mstar;
17027 n6 = MW[3] - Mstar;
17028 n7 = MW[4] - Mstar;
17044 n23 = pow(alpha, NP0*n0);
17045 n24 = n13*xTj + n9;
17046 n25 = n12*xTj + n9;
17047 n26 = pow(alpha, NP0*n4);
17048 n27 = pow(alpha, NP0*n5);
17049 n28 = pow(alpha, NP0*n6);
17050 n29 = pow(alpha, NP0*n7);
17055 n34 = pow(alpha, n0*n11);
17072 n51 = log((-1.0 + xPj/xF[0])/n2);
17082 n61 = n21 + n30 + n51 + n8;
17084 n63 = n16*n34*n36/(n35*n60);
17085 n64 = n43*(n61 - log(n59)) + 1;
17086 n65 = pow(alpha, n0*n64);
17087 n66 = pow(alpha, n4*n64);
17088 n67 = pow(alpha, n5*n64);
17089 n68 = pow(alpha, n6*n64);
17090 n69 = pow(alpha, n64*n7);
17095 n74 = n32 - 1 + 1.0/n65;
17096 n75 = n33 - 1 + 1.0/n66;
17097 n76 = n37 - 1 + 1.0/n67;
17098 n77 = n38 - 1 + 1.0/n68;
17099 n78 = n39 - 1 + 1.0/n69;
17117 n96 = n32*xF[0]/n84;
17118 n97 = n41*xF[3]/n82;
17119 n98 = n1*n49*xF[1]/n75;
17120 n99 = n57*xF[0]/n74;
17121 n100 = n16*n17*n26*xF[1]/n75;
17122 n101 = n31*n48*n92*xF[0];
17123 n102 = n13*n31*n48*n92;
17126 n105 = n31*n55*n89;
17127 n106 = n31*n58*n91;
17128 n107 = n31*n56*n90;
17130 n109 = n54/(n59*n65) + 1;
17132 n111 = n1*n48*n54/(n59*n65) + n1*n48;
17133 n112 = n1*n49 + n1*n62*n70;
17134 n113 = n1*n45 + n1*n62*n73;
17135 n114 = n1*n46 + n1*n62*n72;
17136 n115 = n1*n47 + n1*n62*n71;
17137 n116 = pow(n111, 2);
17138 n117 = pow(n112, 2);
17139 n118 = pow(n113, 2);
17140 n119 = pow(n114, 2);
17141 n120 = pow(n115, 2);
17144 n123 = n22*n48*n54/(n59*n65) + n22*n48;
17147 n126 = n54*n57/(n59*n65) + n57;
17153 n132 = 2*n118*xF[2]/n86;
17154 n133 = -2*n119*n38*xF[3]/n87;
17155 n134 = n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)/n79;
17156 n135 = n22*n31*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48);
17157 n136 = n22*n31*n49*xF[1]*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)/n80;
17158 n137 = n22*n31*n45*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)/n81;
17159 n138 = n22*n31*n46*xF[3]*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46)/n82;
17160 n139 = n22*n31*n47*xF[4]*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)/n83;
17161 n140 = 1.0*n124*n31*n48*n93;
17162 n141 = n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57)/n79;
17163 n142 = -0.5*n126*n31*n32*n93;
17164 n143 = n101 + n134;
17165 n144 = n16*n17*n26 - n17*n63/n66 + n34*n36*n44*n70/(n35*n60) + n44*n62*n70;
17166 n145 = -n18*n63/n67 + n34*n36*n44*n73/(n35*n60) + n44*n62*n73 + n55;
17167 n146 = -n20*n63/n69 + n34*n36*n44*n71/(n35*n60) + n44*n62*n71 + n56;
17168 n147 = n31*n52*(-pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26 + n44*n62*n70)/n80;
17169 n148 = n31*n40*xF[2]*(-pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n44*n62*n73 + n55)/n81;
17170 n149 = n31*n97*(-pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n44*n62*n72 + n58);
17171 n150 = n31*n53*(-pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n44*n62*n71 + n56)/n83;
17172 n151 = n108 + n140 + n142;
17173 n152 = n1*n31*n45*n89 + n1*n31*n47*n90 + n114*n31*n97 + n121*n31*n40/n81 + n128*n31/n83 + n129*n31*n52 + n143 + n31*n46*n94 + n31*n98;
17175 n154 = n103 + n104 + n105 + n106 + n107 + n135 + n136 + n137 + n138 + n139 + n141 + n147 + n148 + n149 + n150;
17176 n155 = n112*n31*n52*(n22*n49 + n22*n62*n70)/n85 + n121*n31*n40*(n22*n45 + n22*n62*n73)/n86 + n122*n31*n41*(n22*n46 + n22*n62*n72)/n87 + n128*n31*(n22*n47 + n22*n62*n71)/n88 + n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)*(pow(alpha, NP0*n0 - n0*n64)*n0*n22*n54/n59 + n22*n48)/n84 + n154;
17178 n157 = -0.5*n111*n123*n31*n96 + n151 - 0.5*n156;
17179 NP_b = -n1*n110*n31*n48*n93 - n102 - n11*(1.0*n1*n31*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48) + n108 - 1.0*n116*n31*n96 - 0.5*n31*n32*n93*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57) - 0.5*xTj*(n103 + n104 + n105 + n106 + n107 + n125*n31*n96 - n130*n31*n39*xF[4] - n131*n31*n33*xF[1] - n132*n31*n37 + n133*n31 + n135 + n136 + n137 + n138 + n139 + n141 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n44*n5*n54/n59 - pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n55)/n81 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n4*n44*n54/n59 - pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26)/n80 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n44*n54*n7/n59 - pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n56)/n83 + n31*n97*(pow(alpha, NP0*n0 - n6*n64)*n44*n54*n6/n59 - pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n58))) - n31*xTj*(n1*n45*n89 + n1*n47*n90 + n114*n97 + n121*n40/n81 + n128/n83 + n129*n52 + n13*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)/n79 + n46*n94 + n48*n92*xF[0] + n98);
17180 NP_2a = -n31*(2*pow(n109, 2)*n34*n50*n96 - 2.0*n109*n34*n50*n93 + n110*n57*n93 - 1.0*n99 + 1.0*xTj*(n100 + n125*n96 + n13*n32*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57)/n79 - n130*n39*xF[4] - n131*n33*xF[1] - n132*n37 + n133 + n22*n45*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)/n81 + n22*n46*xF[3]*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46)/n82 + n22*n47*xF[4]*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)/n83 + n22*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48) + n22*n49*xF[1]*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)/n80 + n40*xF[2]*(-pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n44*n62*n73 + n55)/n81 + n52*(-pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26 + n44*n62*n70)/n80 + n53*(-pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n44*n62*n71 + n56)/n83 + n55*n89 + n56*n90 + n58*n91 + n97*(-pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n44*n62*n72 + n58) + n99));
17181 NP_sqrt_base = pow(-n102 - n11*(1.0*n1*n31*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48) + n108 - 0.5*n31*n32*n93*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57) - 0.5*n31*n96*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)*(pow(alpha, NP0*n0 - n0*n64)*n0*n22*n54/n59 + n22*n48) - 0.5*xTj*(n103 + n104 + n105 + n106 + n107 + n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)*(pow(alpha, NP0*n0 - n0*n64)*n0*n22*n54/n59 + n22*n48)/n84 + n135 + n136 + n137 + n138 + n139 + n141 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)*(pow(alpha, NP0*n0 - n5*n64)*n22*n5*n54/n59 + n22*n45)/n86 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n44*n5*n54/n59 - pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n55)/n81 + n31*n41*xF[3]*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46)*(pow(alpha, NP0*n0 - n6*n64)*n22*n54*n6/n59 + n22*n46)/n87 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)*(pow(alpha, NP0*n0 - n4*n64)*n22*n4*n54/n59 + n22*n49)/n85 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n4*n44*n54/n59 - pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26)/n80 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)*(pow(alpha, NP0*n0 - n64*n7)*n22*n54*n7/n59 + n22*n47)/n88 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n44*n54*n7/n59 - pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n56)/n83 + n31*n97*(pow(alpha, NP0*n0 - n6*n64)*n44*n54*n6/n59 - pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n58))) - n127*n31*n93 - n153, 2) + (-pow(NP0, 2)*n157 + NP0*(n14*(n1*n31*n45*n89 + n1*n31*n47*n90 + n143 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)/n81 + n31*n46*n94 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)/n80 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)/n83 + n31*n97*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46) + n31*n98) + n143) + n31*n95*xF[0] + xTj*(n13*n31*n95 + n31*n40*n89 + n31*n41*n91 + n31*n52/n75 + n31*n53/n78))*(2.0*n103 - 4.0*n116*n31*n96 + 4.0*n124*n31*n48*n93 - 2.0*n126*n31*n32*n93 - 2.0*n156);
17182 NP_sqrt_base = fabs(NP_sqrt_base);
17183 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
17184 NT1 = n43*(n61 - log(-pow(alpha, NP1*n0)*n54 + 1));
17185 g0 = MW[1] - Mstar;
17186 g1 = MW[0] - Mstar;
17189 g4 = MW[2] - Mstar;
17190 g5 = MW[3] - Mstar;
17191 g6 = MW[4] - Mstar;
17199 g14 = pow(alpha, -g1);
17200 g15 = pow(alpha, -g0);
17201 g16 = pow(alpha, -g4);
17202 g17 = pow(alpha, -g5);
17203 g18 = pow(alpha, -g6);
17204 g19 = log(xF[0]/xF[1]);
17206 g21 = pow(alpha, NP1*g0);
17207 g22 = pow(alpha, NP1*g1);
17209 g24 = pow(alpha, NP1*g4);
17210 g25 = pow(alpha, NP1*g5);
17211 g26 = pow(alpha, NP1*g6);
17232 g47 = pow(alpha, g0*g20) - 1;
17233 g48 = pow(alpha, g0*g20) - 1;
17234 g49 = pow(alpha, g1*g20) - 1;
17235 g50 = pow(alpha, g20*g4) - 1;
17236 g51 = pow(alpha, g20*g5) - 1;
17237 g52 = pow(alpha, g20*g6) - 1;
17238 g53 = -pow(alpha, g1*g20);
17239 g54 = -pow(alpha, g20*g4);
17240 g55 = -pow(alpha, g20*g5);
17241 g56 = -pow(alpha, g20*g6);
17242 g57 = g8*g9/(g3*xF[1]);
17248 g63 = pow(alpha, g1*g20) + g36;
17250 g65 = pow(alpha, g20*g4) + g37;
17251 g66 = pow(alpha, g20*g5) + g38;
17252 g67 = pow(alpha, g20*g6) + g39;
17279 g94 = log(g57*g64/g31);
17280 g95 = log(g57*g58/g30);
17281 g96 = log(g13*g29*g64/g48);
17283 g98 = log(g13*g29*g58/g47);
17285 g100 = g42 + g43 + g44 + g45 + g46;
17296 LpF = xF[0]*(g14 + 1.0)*(g102 + g110 + g27)/(g23*(g14 - 1.0)) + xF[1]*(g15 + 1.0)*(g104 + g109 + g27)/(g23*(g15 - 1.0)) + xF[2]*(g16 + 1.0)*(g103 + g106 + g27)/(g23*(g16 - 1.0)) + xF[3]*(g17 + 1.0)*(g105 + g107 + g27)/(g23*(g17 - 1.0)) + xF[4]*(g18 + 1.0)*(g101 + g108 + g27)/(g23*(g18 - 1.0));
17299 SWUpF = -g10*g94*(g39 + 1)/g67 - g10*g96*(pow(alpha, g20*g6) - 1)/g67 - g100 - g11*g94*(g38 + 1)/g66 - g11*g96*(pow(alpha, g20*g5) - 1)/g66 - g12*g94*(g36 + 1)/g63 - g12*g96*(pow(alpha, g1*g20) - 1)/g63 - g31*g68*g97 - g48*g68*g99 - g69*g97*(g37 + 1) - g69*g99*(pow(alpha, g20*g4) - 1);
17300 SWUpP = -g28*(g10*g101 + g10*g108 + g100 + g105*g11 + g107*g11 + g30*g77*g95 + g32*g75*g95 + g33*g76*g95 + g47*g77*g98 + g49*g75*g98 + g50*g76*g98);
17304 xP[3] = g28*g51*g71;
17305 xP[4] = g28*g52*g74;
17309 xT[3] = g34*g41*g71;
17310 xT[4] = g35*g41*g74;
17313 n0 = MW[0] - Mstar;
17317 n4 = MW[1] - Mstar;
17318 n5 = MW[2] - Mstar;
17319 n6 = MW[3] - Mstar;
17320 n7 = MW[4] - Mstar;
17321 n8 = MW[5] - Mstar;
17340 n27 = pow(alpha, NP0*n0);
17341 n28 = n10 + n12*xTj;
17342 n29 = n10 + n13*xPj;
17343 n30 = pow(alpha, NP0*n4);
17344 n31 = pow(alpha, NP0*n5);
17345 n32 = pow(alpha, NP0*n6);
17346 n33 = pow(alpha, NP0*n7);
17347 n34 = pow(alpha, NP0*n8);
17352 n39 = pow(alpha, n0*n15);
17371 n58 = log((-1.0 + xPj/xF[0])/n2);
17384 n71 = n24 + n35 + n58 + n9;
17386 n73 = n18*n39*n41/(n40*n70);
17387 n74 = n47*(n71 - log(n69)) + 1;
17388 n75 = pow(alpha, n0*n74);
17389 n76 = pow(alpha, n4*n74);
17390 n77 = pow(alpha, n5*n74);
17391 n78 = pow(alpha, n6*n74);
17392 n79 = pow(alpha, n7*n74);
17393 n80 = pow(alpha, n74*n8);
17399 n86 = n37 - 1 + 1.0/n75;
17400 n87 = n38 - 1 + 1.0/n76;
17401 n88 = n42 - 1 + 1.0/n77;
17402 n89 = n43 - 1 + 1.0/n78;
17403 n90 = n44 - 1 + 1.0/n79;
17404 n91 = n45 - 1 + 1.0/n80;
17413 n100 = pow(n88, 3);
17414 n101 = pow(n89, 3);
17415 n102 = pow(n90, 3);
17416 n103 = pow(n91, 3);
17425 n112 = -n43*xF[3]/n95;
17426 n113 = n1*n54*xF[5]/n91;
17428 n115 = n18*n23*n34*xF[5]/n91;
17429 n116 = n109*n12*n36*n53;
17430 n117 = n114*n36*xF[0];
17431 n118 = n104*n36*n67;
17432 n119 = n106*n36*n63;
17433 n120 = n107*n36*n66;
17434 n121 = n105*n36*n64;
17436 n123 = n114*n16*n36;
17437 n124 = n62/(n69*n75) + 1;
17438 n125 = n1*n53*n62/(n69*n75) + n1*n53;
17439 n126 = n1*n51 + n1*n72*n81;
17440 n127 = n1*n56 + n1*n72*n85;
17441 n128 = n1*n50 + n1*n72*n83;
17442 n129 = n1*n52 + n1*n72*n82;
17443 n130 = n1*n54 + n1*n72*n84;
17444 n131 = pow(n125, 2);
17445 n132 = pow(n126, 2);
17446 n133 = pow(n127, 2);
17447 n134 = pow(n128, 2);
17448 n135 = pow(n129, 2);
17449 n136 = pow(n130, 2);
17451 n138 = n25*n53*n62/(n69*n75) + n25*n53;
17453 n140 = n62*n65/(n69*n75) + n65;
17455 n142 = n124*n37*xF[0]/n92;
17459 n146 = n129*xF[4]/n96;
17460 n147 = n125*xF[0]/n92;
17461 n148 = 2*n136/n103;
17462 n149 = 2*n135/n102;
17464 n151 = -2*n133/n100;
17465 n152 = -2*n134*n43*xF[3]/n101;
17466 n153 = n140*n37/n92;
17467 n154 = n147*n36*n37;
17468 n155 = n25*n36*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92;
17469 n156 = n25*n36*n51*xF[1]*(pow(alpha, NP0*n0 - n4*n74)*n1*n4*n62/n69 + n1*n51)/n93;
17470 n157 = n25*n36*n59*(pow(alpha, NP0*n0 - n5*n74)*n1*n5*n62/n69 + n1*n56)/n94;
17471 n158 = n25*n36*n50*xF[3]*(pow(alpha, NP0*n0 - n6*n74)*n1*n6*n62/n69 + n1*n50)/n95;
17472 n159 = n25*n36*n52*xF[4]*(pow(alpha, NP0*n0 - n7*n74)*n1*n62*n7/n69 + n1*n52)/n96;
17473 n160 = n25*n36*n54*xF[5]*(pow(alpha, NP0*n0 - n74*n8)*n1*n62*n8/n69 + n1*n54)/n97;
17474 n161 = 1.0*n1*n147*n36*n53;
17475 n162 = n12*n36*n37*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92;
17476 n163 = -0.5*n153*n36*xF[0];
17478 n165 = -n19*n73/n76 + n39*n41*n48*n81/(n40*n70) + n48*n72*n81 + n67;
17479 n166 = -n20*n73/n77 + n39*n41*n48*n85/(n40*n70) + n48*n72*n85 + n63;
17480 n167 = -n22*n73/n79 + n39*n41*n48*n82/(n40*n70) + n48*n72*n82 + n64;
17481 n168 = n18*n23*n34 - n23*n73/n80 + n39*n41*n48*n84/(n40*n70) + n48*n72*n84;
17482 n169 = n36*n61*(-pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n48*n72*n81 + n67)/n93;
17483 n170 = -n36*n55*(-pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n48*n72*n85 + n63)/n94;
17484 n171 = n112*n36*(-pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n48*n72*n83 + n66);
17485 n172 = n36*n60*(-pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n48*n72*n82 + n64)/n96;
17486 n173 = n68*(-pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34 + n48*n72*n84)/n97;
17487 n174 = n123 + n161 + n163;
17488 n175 = xTj*(n1*n104*n36*n51 + n1*n105*n36*n52 + n108*n36*n59 + n109*n36*n53*xF[0] + n110*n36*n50 + n112*n128*n36 + n113*n36 + n12*n36*n37*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n141*n36/n96 + n143*n68 - n144*n36*n55 + n145*n36*n61);
17489 n176 = n116 + n154 + n175;
17490 n177 = n117 + n118 + n119 + n120 + n121 + n122 + n155 + n156 + n157 + n158 + n159 + n160 + n162 + n169 + n170 + n171 + n172 + n173;
17491 n178 = n111*n12*n36*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + n126*n36*n61*(n25*n51 + n25*n72*n81)/n99 + n177 + n130*n68*(n25*n54 + n25*n72*n84)/n103 + n141*n36*(n25*n52 + n25*n72*n82)/n102 - n137*n36*n43*(n25*n50 + n25*n72*n83)/n101 - n127*n36*n55*(n25*n56 + n25*n72*n85)/n100;
17492 NP_b = -n1*n142*n36*n53 - n116 - n15*(1.0*n1*n36*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n111*n131*n26*n36 + n123 - 0.5*n36*n37*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - 0.5*xTj*(-n111*n139*n36*xF[0] + n112*n36*(pow(alpha, NP0*n0 - n6*n74)*n48*n6*n62/n69 - pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n66) + n117 + n118 + n119 + n120 + n121 + n122 - n148*n36*n49 - n149*n36*n44*xF[4] - n150*n36*n38*xF[1] + n151*n36*n55 + n152*n36 + n155 + n156 + n157 + n158 + n159 + n160 + n162 - n36*n55*(pow(alpha, NP0*n0 - n5*n74)*n48*n5*n62/n69 - pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n63)/n94 + n36*n60*(pow(alpha, NP0*n0 - n7*n74)*n48*n62*n7/n69 - pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n64)/n96 + n36*n61*(pow(alpha, NP0*n0 - n4*n74)*n4*n48*n62/n69 - pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n67)/n93 + n68*(pow(alpha, NP0*n0 - n74*n8)*n48*n62*n8/n69 - pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34)/n97)) - n36*xTj*(n1*n104*n51 + n1*n105*n52 + n108*n59 + n109*n53*xF[0] + n110*n50 + n112*n128 + n113 + n12*n37*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n141/n96 - n143*n49 - n144*n55 + n145*n61);
17493 NP_2a = -n36*(2*n111*pow(n124, 2)*n39*n57*xF[0] + n114*n26 - 2.0*n124*n39*n57*xF[0]/n92 + n142*n65 + 1.0*xTj*(n104*n67 + n105*n64 + n106*n63 + n107*n66 - n111*n139*xF[0] + n112*(-pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n48*n72*n83 + n66) + n114*xF[0] + n115 + n12*n37*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - n148*n49 - n149*n44*xF[4] - n150*n38*xF[1] + n151*n55 + n152 + n25*n50*xF[3]*(pow(alpha, NP0*n0 - n6*n74)*n1*n6*n62/n69 + n1*n50)/n95 + n25*n51*xF[1]*(pow(alpha, NP0*n0 - n4*n74)*n1*n4*n62/n69 + n1*n51)/n93 + n25*n52*xF[4]*(pow(alpha, NP0*n0 - n7*n74)*n1*n62*n7/n69 + n1*n52)/n96 + n25*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n25*n54*xF[5]*(pow(alpha, NP0*n0 - n74*n8)*n1*n62*n8/n69 + n1*n54)/n97 + n25*n59*(pow(alpha, NP0*n0 - n5*n74)*n1*n5*n62/n69 + n1*n56)/n94 - n49*(-pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34 + n48*n72*n84)/n97 - n55*(-pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n48*n72*n85 + n63)/n94 + n60*(-pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n48*n72*n82 + n64)/n96 + n61*(-pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n48*n72*n81 + n67)/n93));
17494 NP_sqrt_base = pow(-n15*(1.0*n1*n36*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 - 0.5*n111*n36*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + n123 - 0.5*n36*n37*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - 0.5*xTj*(n111*n12*n36*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + n112*n36*(pow(alpha, NP0*n0 - n6*n74)*n48*n6*n62/n69 - pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n66) + n117 + n118 + n119 + n120 + n121 + n122 + n155 + n156 + n157 + n158 + n159 + n160 + n162 - n36*n55*(pow(alpha, NP0*n0 - n5*n74)*n48*n5*n62/n69 - pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n63)/n94 + n36*n60*(pow(alpha, NP0*n0 - n7*n74)*n48*n62*n7/n69 - pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n64)/n96 + n36*n61*(pow(alpha, NP0*n0 - n4*n74)*n1*n4*n62/n69 + n1*n51)*(pow(alpha, NP0*n0 - n4*n74)*n25*n4*n62/n69 + n25*n51)/n99 + n36*n61*(pow(alpha, NP0*n0 - n4*n74)*n4*n48*n62/n69 - pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n67)/n93 + n68*(pow(alpha, NP0*n0 - n74*n8)*n48*n62*n8/n69 - pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34)/n97 + n68*(pow(alpha, NP0*n0 - n74*n8)*n1*n62*n8/n69 + n1*n54)*(pow(alpha, NP0*n0 - n74*n8)*n25*n62*n8/n69 + n25*n54)/n103 + n36*n60*(pow(alpha, NP0*n0 - n7*n74)*n1*n62*n7/n69 + n1*n52)*(pow(alpha, NP0*n0 - n7*n74)*n25*n62*n7/n69 + n25*n52)/n102 - n36*n43*xF[3]*(pow(alpha, NP0*n0 - n6*n74)*n1*n6*n62/n69 + n1*n50)*(pow(alpha, NP0*n0 - n6*n74)*n25*n6*n62/n69 + n25*n50)/n101 - n36*n55*(pow(alpha, NP0*n0 - n5*n74)*n1*n5*n62/n69 + n1*n56)*(pow(alpha, NP0*n0 - n5*n74)*n25*n5*n62/n69 + n25*n56)/n100)) - n176, 2) + (-pow(NP0, 2)*(-n1*n26*n36*n53*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 - n111*n16*n36*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + 0.5*n117 - n16*n36*n37*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - 0.5*n178*xTj) - NP0*n176 - n12*n36*n37/(n37 - 1 + pow(alpha, -n0*(n47*(n71 - log(n29*n46/(n10 + n13*xF[0]) + 1)) + 1))) - n13*(-n36*n37*xF[0]/(n37 - 1 + pow(alpha, -n0*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n38*xF[1]/(n38 - 1 + pow(alpha, -n4*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n43*xF[3]/(n43 - 1 + pow(alpha, -n6*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n44*xF[4]/(n44 - 1 + pow(alpha, -n7*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n49/(n45 - 1 + pow(alpha, -n8*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n55/(n42 - 1 + pow(alpha, -n5*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1)))))*(4.0*n1*n147*n36*n53 - 4.0*n111*n131*n36*xF[0] + 2.0*n117 - 2.0*n153*n36*xF[0] - 2.0*n178*xTj);
17495 NP_sqrt_base = fabs(NP_sqrt_base);
17496 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
17497 NT1 = n47*(n71 - log(-pow(alpha, NP1*n0)*n62 + 1));
17498 g0 = MW[1] - Mstar;
17499 g1 = MW[0] - Mstar;
17502 g4 = MW[2] - Mstar;
17503 g5 = MW[3] - Mstar;
17504 g6 = MW[4] - Mstar;
17505 g7 = MW[5] - Mstar;
17510 g12 = pow(alpha, -g1);
17511 g13 = pow(alpha, -g0);
17512 g14 = pow(alpha, -g4);
17513 g15 = pow(alpha, -g5);
17514 g16 = pow(alpha, -g6);
17515 g17 = pow(alpha, -g7);
17516 g18 = log(xF[0]/xF[1]);
17518 g20 = pow(alpha, NP1*g0);
17519 g21 = pow(alpha, NP1*g1);
17521 g23 = pow(alpha, NP1*g4);
17522 g24 = pow(alpha, NP1*g5);
17523 g25 = pow(alpha, NP1*g6);
17524 g26 = pow(alpha, NP1*g7);
17542 g44 = pow(alpha, g0*g19) - 1;
17543 g45 = pow(alpha, g0*g19) - 1;
17544 g46 = pow(alpha, g1*g19) - 1;
17545 g47 = pow(alpha, g19*g4) - 1;
17546 g48 = pow(alpha, g19*g5) - 1;
17547 g49 = pow(alpha, g19*g6) - 1;
17548 g50 = pow(alpha, g19*g7) - 1;
17549 g51 = -pow(alpha, g1*g19);
17550 g52 = -pow(alpha, g19*g4);
17551 g53 = -pow(alpha, g19*g5);
17552 g54 = -pow(alpha, g19*g6);
17553 g55 = -pow(alpha, g19*g7);
17554 g56 = g10*g9/(g3*xF[1]);
17561 g63 = pow(alpha, g1*g19) + g37;
17563 g65 = pow(alpha, g19*g4) + g38;
17564 g66 = pow(alpha, g19*g5) + g39;
17565 g67 = pow(alpha, g19*g6) + g40;
17566 g68 = pow(alpha, g19*g7) + g41;
17591 g93 = log(g56*g64/g31);
17592 g94 = log(g56*g57/g30);
17593 g95 = log(g11*g29*g64/g45);
17595 g97 = log(g11*g29*g57/g44);
17597 g99 = -g31*g72*g96 - g42*xF[0] - g42*xF[1] - g42*xF[2] - g42*xF[3] - g42*xF[4] - g42*xF[5] - g45*g72*g98 - g69*g96*(g41 + 1) - g69*g98*(pow(alpha, g19*g7) - 1) - g70*g96*(g40 + 1) - g70*g98*(pow(alpha, g19*g6) - 1) - g71*g96*(g39 + 1) - g71*g98*(pow(alpha, g19*g5) - 1) - g73*g96*(g38 + 1) - g73*g98*(pow(alpha, g19*g4) - 1) - g74*g96*(g37 + 1) - g74*g98*(pow(alpha, g1*g19) - 1);
17598 LpF = xF[0]*(g12 + 1.0)*(g27 + g82*g94 + g91*g97)/(g22*(g12 - 1.0)) + xF[1]*(g13 + 1.0)*(g27 + g85*g94 + g87*g97)/(g22*(g13 - 1.0)) + xF[2]*(g14 + 1.0)*(g27 + g86*g94 + g88*g97)/(g22*(g14 - 1.0)) + xF[3]*(g15 + 1.0)*(g27 + g83*g94 + g89*g97)/(g22*(g15 - 1.0)) + xF[4]*(g16 + 1.0)*(g27 + g81*g94 + g92*g97)/(g22*(g16 - 1.0)) + xF[5]*(g17 + 1.0)*(g27 + g84*g94 + g90*g97)/(g22*(g17 - 1.0));
17603 xP[0] = g28*g46*g77;
17604 xP[1] = g28*g44*g75;
17605 xP[2] = g28*g47*g80;
17606 xP[3] = g28*g48*g76;
17607 xP[4] = g28*g49*g78;
17608 xP[5] = g28*g50*g79;
17609 xT[0] = g32*g43*g77;
17610 xT[1] = g30*g43*g75;
17611 xT[2] = g33*g43*g80;
17612 xT[3] = g34*g43*g76;
17613 xT[4] = g35*g43*g78;
17614 xT[5] = g36*g43*g79;
17617 n0 = MW[0] - Mstar;
17621 n4 = MW[1] - Mstar;
17622 n5 = MW[2] - Mstar;
17623 n6 = MW[3] - Mstar;
17624 n7 = MW[4] - Mstar;
17625 n8 = MW[5] - Mstar;
17626 n9 = MW[6] - Mstar;
17634 n17 = pow(n0, -n11);
17635 n18 = pow(n1, -n11);
17636 n19 = pow(n4, -n11);
17637 n20 = pow(n5, -n11);
17638 n21 = pow(n6, -n11);
17639 n22 = pow(n7, -n11);
17640 n23 = pow(n8, -n11);
17641 n24 = pow(n9, -n11);
17645 n28 = pow(alpha, NP0*n0);
17646 n29 = n12 + n16*xTj;
17647 n30 = n12 + n15*xTj;
17648 n31 = pow(alpha, NP0*n4);
17649 n32 = pow(alpha, NP0*n5);
17650 n33 = pow(alpha, NP0*n6);
17651 n34 = pow(alpha, NP0*n7);
17652 n35 = pow(alpha, NP0*n8);
17653 n36 = pow(alpha, NP0*n9);
17658 n41 = pow(alpha, n0*n14);
17659 n42 = pow(n29, -n11);
17660 n43 = pow(n30, -n11);
17679 n62 = log((-1.0 + xPj/xF[0])/n2);
17691 n74 = pow(n73, -n11);
17692 n75 = n10 + n25 + n37 + n62;
17694 n77 = n18*n41*n43/(n42*n74);
17695 n78 = n52*(n75 - log(n73)) + 1;
17696 n79 = pow(alpha, n0*n78);
17697 n80 = pow(alpha, n4*n78);
17698 n81 = pow(alpha, n5*n78);
17699 n82 = pow(alpha, n6*n78);
17700 n83 = pow(alpha, n7*n78);
17701 n84 = pow(alpha, n78*n8);
17702 n85 = pow(alpha, n78*n9);
17709 n92 = n39 - 1 + 1.0/n79;
17710 n93 = n40 - 1 + 1.0/n80;
17711 n94 = n44 - 1 + 1.0/n81;
17712 n95 = n45 - 1 + 1.0/n82;
17713 n96 = n46 - 1 + 1.0/n83;
17714 n97 = n47 - 1 + 1.0/n84;
17715 n98 = n48 - 1 + 1.0/n85;
17716 n99 = pow(n92, -n11);
17717 n100 = pow(n93, -n11);
17718 n101 = pow(n94, -n11);
17719 n102 = pow(n95, -n11);
17720 n103 = pow(n96, -n11);
17721 n104 = pow(n97, -n11);
17722 n105 = pow(n98, -n11);
17723 n106 = pow(n92, 3);
17724 n107 = pow(n93, 3);
17725 n108 = pow(n94, 3);
17726 n109 = pow(n95, 3);
17727 n110 = pow(n96, 3);
17728 n111 = pow(n97, 3);
17729 n112 = pow(n98, 3);
17736 n119 = n1*xF[5]/n97;
17737 n120 = n1*xF[1]/n93;
17740 n123 = n39*xF[0]/n106;
17741 n124 = n45*xF[3]/n109;
17742 n125 = -n45*xF[3]/n102;
17743 n126 = n69*xF[0]/n92;
17744 n127 = n18*n19*n31*xF[1]/n93;
17745 n128 = n18*n23*n35*xF[5]/n97;
17746 n129 = n117*n38*n60*xF[0];
17747 n130 = n117*n16*n38*n60;
17750 n133 = n114*n38*n67;
17751 n134 = n116*n38*n70;
17752 n135 = n115*n38*n68;
17754 n137 = n113*n38*n71;
17756 n139 = n66/(n73*n79) + 1;
17757 n140 = n1*n60*n66/(n73*n79) + n1*n60;
17758 n141 = n1*n59 + n1*n76*n86;
17759 n142 = n1*n54 + n1*n76*n91;
17760 n143 = n1*n57 + n1*n76*n88;
17761 n144 = n1*n58 + n1*n76*n87;
17762 n145 = n1*n55 + n1*n76*n90;
17763 n146 = n1*n56 + n1*n76*n89;
17764 n147 = pow(n140, -n11);
17765 n148 = pow(n141, -n11);
17766 n149 = pow(n142, -n11);
17767 n150 = pow(n143, -n11);
17768 n151 = pow(n144, -n11);
17769 n152 = pow(n145, -n11);
17770 n153 = pow(n146, -n11);
17772 n155 = n26*n60*n66/(n73*n79) + n26*n60;
17773 n156 = n66*n69/(n73*n79) + n69;
17776 n159 = n139*n39*xF[0]/n99;
17780 n163 = n146*xF[6]/n105;
17782 n165 = n149*n44*xF[2]/n108;
17783 n166 = n156*n39/n99;
17784 n167 = n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99;
17785 n168 = n1*n11*n16*n38*n60*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99;
17786 n169 = n26*n38*n59*xF[1]*(pow(alpha, NP0*n0 - n4*n78)*n1*n4*n66/n73 + n1*n59)/n100;
17787 n170 = n26*n38*n54*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n1*n5*n66/n73 + n1*n54)/n101;
17788 n171 = n26*n38*n57*xF[3]*(pow(alpha, NP0*n0 - n6*n78)*n1*n6*n66/n73 + n1*n57)/n102;
17789 n172 = n26*n38*n58*xF[4]*(pow(alpha, NP0*n0 - n7*n78)*n1*n66*n7/n73 + n1*n58)/n103;
17790 n173 = n26*n38*n55*xF[5]*(pow(alpha, NP0*n0 - n78*n8)*n1*n66*n8/n73 + n1*n55)/n104;
17791 n174 = n26*n38*n56*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n1*n66*n9/n73 + n1*n56)/n105;
17792 n175 = 1.0*n1*n164*n38*n60;
17793 n176 = n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99;
17794 n177 = -0.5*n166*n38*xF[0];
17795 n178 = n129 + n167;
17796 n179 = n18*n19*n31 - n19*n77/n80 + n41*n43*n53*n86/(n42*n74) + n53*n76*n86;
17797 n180 = -n20*n77/n81 + n41*n43*n53*n91/(n42*n74) + n53*n76*n91 + n67;
17798 n181 = -n22*n77/n83 + n41*n43*n53*n87/(n42*n74) + n53*n76*n87 + n68;
17799 n182 = n18*n23*n35 - n23*n77/n84 + n41*n43*n53*n90/(n42*n74) + n53*n76*n90;
17800 n183 = -n24*n77/n85 + n41*n43*n53*n89/(n42*n74) + n53*n76*n89 + n71;
17801 n184 = n38*n64*(-pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31 + n53*n76*n86)/n100;
17802 n185 = n38*n50*xF[2]*(-pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n53*n76*n91 + n67)/n101;
17803 n186 = n125*n38*(-pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n53*n76*n88 + n70);
17804 n187 = n38*n65*(-pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n53*n76*n87 + n68)/n103;
17805 n188 = n72*(-pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35 + n53*n76*n90)/n104;
17806 n189 = n38*n49*xF[6]*(-pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n53*n76*n89 + n71)/n105;
17807 n190 = n138 + n175 + n177;
17808 n191 = n1*n113*n38*n56 + n1*n114*n38*n54 + n1*n115*n38*n58 + n119*n38*n55 + n120*n38*n59 + n121*n38*n57 + n125*n143*n38 + n160*n72 + n161*n38*n64 + n163*n38*n49 + n178 + n158*n38/n103 + n154*n38*n50/n101;
17810 n193 = n131 + n132 + n133 + n134 + n135 + n136 + n137 + n168 + n169 + n170 + n171 + n172 + n173 + n174 + n176 + n184 + n185 + n186 + n187 + n188 + n189;
17811 n194 = n118*n146*n38*n49*(n26*n56 + n26*n76*n89) - n124*n143*n38*(n26*n57 + n26*n76*n88) + n193 + n145*n72*(n26*n55 + n26*n76*n90)/n111 + n158*n38*(n26*n58 + n26*n76*n87)/n110 + n154*n38*n50*(n26*n54 + n26*n76*n91)/n108 + n141*n38*n64*(n26*n59 + n26*n76*n86)/n107 + n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)*(pow(alpha, NP0*n0 - n0*n78)*n0*n26*n66/n73 + n26*n60)/n106;
17812 NP_b = -n1*n159*n38*n60 - n130 - n14*(1.0*n1*n38*n60*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 - 1.0*n123*n147*n38 + n138 + n27*(n11*n118*n157*n38 + n11*n123*n147*n38 + n11*n124*n150*n38 + n11*n165*n38 + n11*n152*n38*n47*xF[5]/n111 + n11*n151*n38*n46*xF[4]/n110 + n125*n38*(pow(alpha, NP0*n0 - n6*n78)*n53*n6*n66/n73 - pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n70) + n131 + n132 + n133 + n134 + n135 + n136 + n137 + n168 + n169 + n170 + n171 + n172 + n173 + n174 + n176 + n11*n148*n38*n40*xF[1]/n107 + n38*n49*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n53*n66*n9/n73 - pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n71)/n105 + n72*(pow(alpha, NP0*n0 - n78*n8)*n53*n66*n8/n73 - pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35)/n104 + n38*n65*(pow(alpha, NP0*n0 - n7*n78)*n53*n66*n7/n73 - pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n68)/n103 + n38*n50*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n5*n53*n66/n73 - pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n67)/n101 + n38*n64*(pow(alpha, NP0*n0 - n4*n78)*n4*n53*n66/n73 - pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31)/n100) - 0.5*n38*n39*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99) - n38*xTj*(n1*n113*n56 + n1*n114*n54 + n1*n115*n58 + n117*n60*xF[0] + n119*n55 + n120*n59 + n121*n57 + n125*n143 + n16*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 + n160*n63 + n161*n64 + n163*n49 + n158/n103 + n154*n50/n101);
17813 NP_2a = -n38*(-1.0*n126 - 2.0*n139*n41*n61*xF[0]/n99 + n159*n69 + 1.0*xTj*(n1*n11*n16*n60*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 + n11*n118*n157 + n11*n123*n147 + n11*n124*n150 + n11*n165 + n11*n152*n47*xF[5]/n111 + n11*n151*n46*xF[4]/n110 + n113*n71 + n114*n67 + n115*n68 + n116*n70 + n125*(-pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n53*n76*n88 + n70) + n126 + n127 + n128 + n16*n39*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99 + n11*n148*n40*xF[1]/n107 + n26*n56*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n1*n66*n9/n73 + n1*n56)/n105 + n49*xF[6]*(-pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n53*n76*n89 + n71)/n105 + n26*n55*xF[5]*(pow(alpha, NP0*n0 - n78*n8)*n1*n66*n8/n73 + n1*n55)/n104 + n63*(-pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35 + n53*n76*n90)/n104 + n26*n58*xF[4]*(pow(alpha, NP0*n0 - n7*n78)*n1*n66*n7/n73 + n1*n58)/n103 + n65*(-pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n53*n76*n87 + n68)/n103 + n26*n57*xF[3]*(pow(alpha, NP0*n0 - n6*n78)*n1*n6*n66/n73 + n1*n57)/n102 + n26*n54*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n1*n5*n66/n73 + n1*n54)/n101 + n50*xF[2]*(-pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n53*n76*n91 + n67)/n101 + n26*n59*xF[1]*(pow(alpha, NP0*n0 - n4*n78)*n1*n4*n66/n73 + n1*n59)/n100 + n64*(-pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31 + n53*n76*n86)/n100) + n11*pow(n139, -n11)*n16*n39*n41*n61/n106);
17814 NP_sqrt_base = (NP0*(n178 - n192) + n122*n38*xF[0] + xTj*(n113*n38*n49 + n114*n38*n50 - n116*n38*n45 + n122*n16*n38 + n38*n64/n93 + n38*n65/n96 + n72/n97) + pow(NP0, -n11)*(-1.0*n1*n164*n38*n60 + 0.5*n123*n140*n155*n38 - 0.5*n131 + 0.5*n166*n38*xF[0] + 0.5*n194*xTj))*(4.0*n1*n164*n38*n60 - n11*n176 + n11*n194*xTj - 4.0*n123*n147*n38 + 2.0*n131) + pow(-n130 - n14*(1.0*n1*n38*n60*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 - 0.5*n123*n38*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)*(pow(alpha, NP0*n0 - n0*n78)*n0*n26*n66/n73 + n26*n60) + n138 + n27*(n118*n38*n49*(pow(alpha, NP0*n0 - n78*n9)*n1*n66*n9/n73 + n1*n56)*(pow(alpha, NP0*n0 - n78*n9)*n26*n66*n9/n73 + n26*n56) - n124*n38*(pow(alpha, NP0*n0 - n6*n78)*n1*n6*n66/n73 + n1*n57)*(pow(alpha, NP0*n0 - n6*n78)*n26*n6*n66/n73 + n26*n57) + n125*n38*(pow(alpha, NP0*n0 - n6*n78)*n53*n6*n66/n73 - pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n70) + n131 + n132 + n133 + n134 + n135 + n136 + n137 + n168 + n169 + n170 + n171 + n172 + n173 + n174 + n176 + n72*(pow(alpha, NP0*n0 - n78*n8)*n1*n66*n8/n73 + n1*n55)*(pow(alpha, NP0*n0 - n78*n8)*n26*n66*n8/n73 + n26*n55)/n111 + n38*n65*(pow(alpha, NP0*n0 - n7*n78)*n1*n66*n7/n73 + n1*n58)*(pow(alpha, NP0*n0 - n7*n78)*n26*n66*n7/n73 + n26*n58)/n110 + n38*n50*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n1*n5*n66/n73 + n1*n54)*(pow(alpha, NP0*n0 - n5*n78)*n26*n5*n66/n73 + n26*n54)/n108 + n38*n64*(pow(alpha, NP0*n0 - n4*n78)*n1*n4*n66/n73 + n1*n59)*(pow(alpha, NP0*n0 - n4*n78)*n26*n4*n66/n73 + n26*n59)/n107 + n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)*(pow(alpha, NP0*n0 - n0*n78)*n0*n26*n66/n73 + n26*n60)/n106 + n38*n49*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n53*n66*n9/n73 - pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n71)/n105 + n72*(pow(alpha, NP0*n0 - n78*n8)*n53*n66*n8/n73 - pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35)/n104 + n38*n65*(pow(alpha, NP0*n0 - n7*n78)*n53*n66*n7/n73 - pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n68)/n103 + n38*n50*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n5*n53*n66/n73 - pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n67)/n101 + n38*n64*(pow(alpha, NP0*n0 - n4*n78)*n4*n53*n66/n73 - pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31)/n100) - 0.5*n38*n39*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99) - n164*n38*n39 - n192, -n11);
17815 NP_sqrt_base = fabs(NP_sqrt_base);
17816 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
17817 NT1 = n52*(n75 - log(-pow(alpha, NP1*n0)*n66 + 1));
17818 g0 = MW[1] - Mstar;
17819 g1 = MW[0] - Mstar;
17822 g4 = MW[2] - Mstar;
17823 g5 = MW[3] - Mstar;
17824 g6 = MW[4] - Mstar;
17825 g7 = MW[5] - Mstar;
17826 g8 = MW[6] - Mstar;
17831 g13 = pow(alpha, -g1);
17832 g14 = pow(alpha, -g0);
17833 g15 = pow(alpha, -g4);
17834 g16 = pow(alpha, -g5);
17835 g17 = pow(alpha, -g6);
17836 g18 = pow(alpha, -g7);
17837 g19 = pow(alpha, -g8);
17838 g20 = log(xF[0]/xF[1]);
17840 g22 = pow(alpha, NP1*g0);
17841 g23 = pow(alpha, NP1*g1);
17843 g25 = pow(alpha, NP1*g4);
17844 g26 = pow(alpha, NP1*g5);
17845 g27 = pow(alpha, NP1*g6);
17846 g28 = pow(alpha, NP1*g7);
17847 g29 = pow(alpha, NP1*g8);
17867 g49 = g10/(g3*xF[1]);
17868 g50 = pow(alpha, g0*g21) - 1;
17869 g51 = pow(alpha, g0*g21) - 1;
17870 g52 = pow(alpha, g1*g21) - 1;
17871 g53 = pow(alpha, g21*g4) - 1;
17872 g54 = pow(alpha, g21*g5) - 1;
17873 g55 = pow(alpha, g21*g6) - 1;
17874 g56 = pow(alpha, g21*g7) - 1;
17875 g57 = pow(alpha, g21*g8) - 1;
17876 g58 = -pow(alpha, g1*g21);
17877 g59 = -pow(alpha, g21*g4);
17878 g60 = -pow(alpha, g21*g5);
17879 g61 = -pow(alpha, g21*g6);
17880 g62 = -pow(alpha, g21*g7);
17881 g63 = -pow(alpha, g21*g8);
17889 g71 = pow(alpha, g1*g21) + g41;
17891 g73 = pow(alpha, g21*g4) + g42;
17892 g74 = pow(alpha, g21*g5) + g43;
17893 g75 = pow(alpha, g21*g6) + g44;
17894 g76 = pow(alpha, g21*g7) + g45;
17895 g77 = pow(alpha, g21*g8) + g46;
17924 g106 = log(g11*g49*g72/g34);
17925 g107 = log(g11*g49*g64/g33);
17926 g108 = log(g12*g31*g72/g51);
17928 g110 = log(g12*g31*g64/g50);
17930 g112 = -g109*g34*g79 - g109*g78*(g41 + 1) - g109*g80*(g42 + 1) - g109*g81*(g43 + 1) - g109*g82*(g46 + 1) - g109*g83*(g44 + 1) - g109*g84*(g45 + 1) - g111*g51*g79 - g111*g78*(pow(alpha, g1*g21) - 1) - g111*g80*(pow(alpha, g21*g4) - 1) - g111*g81*(pow(alpha, g21*g5) - 1) - g111*g82*(pow(alpha, g21*g8) - 1) - g111*g83*(pow(alpha, g21*g6) - 1) - g111*g84*(pow(alpha, g21*g7) - 1) - g47*xF[0] - g47*xF[1] - g47*xF[2] - g47*xF[3] - g47*xF[4] - g47*xF[5] - g47*xF[6];
17931 LpF = xF[0]*(g13 + 1.0)*(g100*g110 + g107*g94 + g30)/(g24*(g13 - 1.0)) + xF[1]*(g14 + 1.0)*(g107*g97 + g110*g99 + g30)/(g24*(g14 - 1.0)) + xF[2]*(g15 + 1.0)*(g102*g110 + g107*g98 + g30)/(g24*(g15 - 1.0)) + xF[3]*(g16 + 1.0)*(g103*g110 + g107*g96 + g30)/(g24*(g16 - 1.0)) + xF[4]*(g17 + 1.0)*(g104*g110 + g107*g93 + g30)/(g24*(g17 - 1.0)) + xF[5]*(g18 + 1.0)*(g101*g110 + g107*g95 + g30)/(g24*(g18 - 1.0)) + xF[6]*(g19 + 1.0)*(g105*g110 + g107*g92 + g30)/(g24*(g19 - 1.0));
17936 xP[0] = g32*g52*g86;
17937 xP[1] = g32*g50*g85;
17938 xP[2] = g32*g53*g89;
17939 xP[3] = g32*g54*g91;
17940 xP[4] = g32*g55*g87;
17941 xP[5] = g32*g56*g88;
17942 xP[6] = g32*g57*g90;
17943 xT[0] = g35*g48*g86;
17944 xT[1] = g33*g48*g85;
17945 xT[2] = g36*g48*g89;
17946 xT[3] = g37*g48*g91;
17947 xT[4] = g38*g48*g87;
17948 xT[5] = g39*g48*g88;
17949 xT[6] = g40*g48*g90;
17952 n0 = -0.500000000000000;
17953 n1 = -2.00000000000000;
17954 n2 = MW[0] - Mstar;
17958 n6 = MW[1] - Mstar;
17959 n7 = MW[2] - Mstar;
17960 n8 = MW[3] - Mstar;
17961 n9 = MW[4] - Mstar;
17962 n10 = MW[5] - Mstar;
17963 n11 = MW[6] - Mstar;
17964 n12 = MW[7] - Mstar;
17972 n20 = pow(n2, -n1);
17973 n21 = pow(n3, -n1);
17974 n22 = pow(n6, -n1);
17975 n23 = pow(n7, -n1);
17976 n24 = pow(n8, -n1);
17977 n25 = pow(n9, -n1);
17978 n26 = pow(n10, -n1);
17979 n27 = pow(n11, -n1);
17980 n28 = pow(n12, -n1);
17983 n31 = pow(alpha, NP0*n2);
17984 n32 = n15 + n19*xF[0];
17985 n33 = n15 + n17*xTj;
17986 n34 = pow(alpha, NP0*n6);
17987 n35 = pow(alpha, NP0*n7);
17988 n36 = pow(alpha, NP0*n8);
17989 n37 = pow(alpha, NP0*n9);
17990 n38 = pow(alpha, NP0*n10);
17991 n39 = pow(alpha, NP0*n11);
17992 n40 = pow(alpha, NP0*n12);
17997 n45 = pow(alpha, n18*n2);
17998 n46 = pow(n33, -n1);
18027 n75 = log((-1.0 + xPj/xF[0])/n4);
18041 n89 = n13 + n29 + n41 + n75;
18043 n91 = n21*pow(n32, n14)*n45*n46*pow(n88, n14);
18044 n92 = n62*(n89 - log(n88)) + 1;
18045 n93 = pow(alpha, n2*n92);
18046 n94 = pow(alpha, n6*n92);
18047 n95 = pow(alpha, n7*n92);
18048 n96 = pow(alpha, n8*n92);
18049 n97 = pow(alpha, n9*n92);
18050 n98 = pow(alpha, n10*n92);
18051 n99 = pow(alpha, n11*n92);
18052 n100 = pow(alpha, n12*n92);
18061 n109 = n43 - 1 + 1.0/n93;
18062 n110 = n44 - 1 + 1.0/n94;
18063 n111 = n47 - 1 + 1.0/n95;
18064 n112 = n48 - 1 + 1.0/n96;
18065 n113 = n49 - 1 + 1.0/n97;
18066 n114 = n50 - 1 + 1.0/n98;
18067 n115 = n51 - 1 + 1.0/n99;
18068 n116 = n52 - 1 + 1.0/n100;
18069 n117 = pow(n109, 3);
18070 n118 = pow(n110, 3);
18071 n119 = pow(n111, 3);
18072 n120 = pow(n112, 3);
18073 n121 = pow(n113, 3);
18074 n122 = pow(n114, 3);
18075 n123 = pow(n115, 3);
18076 n124 = pow(n116, 3);
18085 n133 = pow(n109, n14)*xF[0];
18087 n135 = -pow(n110, n14);
18089 n137 = n43*xF[0]/n117;
18090 n138 = n52*xF[7]/n124;
18091 n139 = pow(n116, n14)*n52*xF[7];
18092 n140 = -pow(n112, n14)*n48*xF[3];
18094 n142 = n129*n2*n3*n42*n53;
18096 n144 = n127*n42*n87;
18097 n145 = n128*n42*n80;
18098 n146 = n132*n42*n85;
18099 n147 = n131*n42*n81;
18100 n148 = n130*n42*n82;
18101 n149 = n125*n42*n86;
18102 n150 = n126*n42*n84;
18103 n151 = n0*n129*n42*n53*n74;
18104 n152 = n79/(n88*n93) + 1;
18106 n154 = n77*n79/(n88*n93) + n77;
18107 n155 = n101*n3*n90 + n3*n71;
18108 n156 = n108*n3*n90 + n3*n64;
18109 n157 = n103*n3*n90 + n3*n70;
18110 n158 = n102*n3*n90 + n3*n72;
18111 n159 = n106*n3*n90 + n3*n65;
18112 n160 = n105*n3*n90 + n3*n69;
18113 n161 = n104*n3*n90 + n78;
18114 n162 = pow(n154, -n1);
18115 n163 = pow(n155, -n1);
18116 n164 = pow(n156, -n1);
18117 n165 = pow(n157, -n1);
18118 n166 = pow(n158, -n1);
18119 n167 = pow(n159, -n1);
18120 n168 = pow(n160, -n1);
18121 n169 = pow(n161, -n1);
18123 n171 = n107*n30*n90 + n2*n30*n31;
18124 n172 = n79*n83/(n88*n93) + n83;
18127 n175 = pow(n114, n14)*n159;
18128 n176 = pow(n111, n14)*n156;
18129 n177 = pow(n115, n14)*n160;
18132 n180 = pow(n113, n14)*n158*xF[4];
18134 n182 = pow(n110, n14)*n155*xF[1];
18136 n184 = pow(n116, n14)*n161*xF[7];
18137 n185 = n165*n48*xF[3]/n120;
18138 n186 = n133*n154*n42*n43;
18139 n187 = n133*n2*n30*n31*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77);
18140 n188 = pow(n110, n14)*n30*n42*n71*xF[1]*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71);
18141 n189 = pow(n111, n14)*n30*n42*n64*xF[2]*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64);
18142 n190 = pow(n112, n14)*n30*n42*n70*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70);
18143 n191 = pow(n113, n14)*n30*n42*n72*xF[4]*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72);
18144 n192 = pow(n114, n14)*n30*n42*n65*xF[5]*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65);
18145 n193 = pow(n115, n14)*n30*n42*n69*xF[6]*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69);
18146 n194 = pow(n116, n14)*n30*n42*n73*xF[7]*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78);
18147 n195 = 1.0*n133*n154*n42*n77;
18148 n196 = -n133*n174*n42;
18149 n197 = n0*n133*n174*n42;
18151 n199 = n108*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n108*n61*n90 - n23*n91/n95 + n80;
18152 n200 = n102*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n102*n61*n90 - n25*n91/n97 + n81;
18153 n201 = n106*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n106*n61*n90 - n26*n91/n98 + n82;
18154 n202 = n105*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n105*n61*n90 - n27*n91/n99 + n86;
18155 n203 = n135*n42*n66*(-pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n101*n61*n90 + n87);
18156 n204 = -pow(n111, n14)*n42*n63*(-pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n108*n61*n90 + n80);
18157 n205 = n140*n42*(-pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n103*n61*n90 + n85);
18158 n206 = -pow(n113, n14)*n42*n67*(-pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n102*n61*n90 + n81);
18159 n207 = pow(n114, n14)*n42*n76*(pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n106*n61*n90 + n82);
18160 n208 = -pow(n115, n14)*n42*n68*(pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n105*n61*n90 + n86);
18161 n209 = -n139*n42*(pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n104*n61*n90 + n84);
18162 n210 = n151 + n195 + n197;
18163 n211 = xTj*(pow(n113, n14)*n173*n42 + n125*n3*n42*n69 + n126*n42*n78 + n127*n3*n42*n71 + n128*n3*n42*n64 + n129*n42*n77 + n131*n3*n42*n72 + n134*n42*n65 + n135*n155*n42*n66 + n136*n42*n70 - n139*n161*n42 + n140*n157*n42 + n175*n42*n76 - n176*n42*n63 - n177*n42*n68 - n186);
18164 n212 = n142 + n186 + n211;
18165 n213 = n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 + n196 + n203 + n204 + n205 + n206 + n207 + n208 + n209;
18166 NP_b = -n133*n153*n42*n77 - n142 - n18*(n0*n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n0*xTj*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) + n137*n14*n162*n42 + n138*n14*n169*n42 - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n14*n178*n42*n67 + n14*n179*n42*n68 + n14*n181*n42*n63 + n14*n183*n42*n66 + n14*n185*n42 + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 + n14*n167*n42*n50*xF[5]/n122) + 1.0*n133*n42*n77*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77) - 1.0*n137*n162*n42 + n151) - n42*xTj*(pow(n113, n14)*n173 + n125*n3*n69 + n126*n78 + n127*n3*n71 + n128*n3*n64 + n129*n77 + n131*n3*n72 - n133*n154*n43 + n134*n65 + n135*n155*n66 + n136*n70 - n139*n161 + n140*n157 + n175*n76 - n176*n63 - n177*n68);
18167 NP_2a = -n42*(n1*n133*n152*n45*n74 - n1*n137*pow(n152, -n1)*n45*n74 + n133*n153*n83 - 1.0*n141 + 1.0*xTj*(pow(n110, n14)*n30*n71*xF[1]*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71) + pow(n111, n14)*n30*n64*xF[2]*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64) - pow(n111, n14)*n63*(-pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n108*n61*n90 + n80) + pow(n112, n14)*n30*n70*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70) + pow(n113, n14)*n30*n72*xF[4]*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72) - pow(n113, n14)*n67*(-pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n102*n61*n90 + n81) + pow(n114, n14)*n30*n65*xF[5]*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65) + pow(n114, n14)*n76*(pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n106*n61*n90 + n82) + pow(n115, n14)*n30*n69*xF[6]*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69) - pow(n115, n14)*n68*(pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n105*n61*n90 + n86) + pow(n116, n14)*n30*n73*xF[7]*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78) + n125*n86 + n126*n84 + n127*n87 + n128*n80 + n130*n82 + n131*n81 + n132*n85 - n133*n174 + n133*n2*n30*n31*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77) + n135*n66*(-pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n101*n61*n90 + n87) + n137*n14*n162 + n138*n14*n169 - n139*(pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n104*n61*n90 + n84) + n14*n178*n67 + n14*n179*n68 + n14*n181*n63 + n14*n183*n66 + n14*n185 + n140*(-pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n103*n61*n90 + n85) + n141 + n14*n167*n50*xF[5]/n122));
18168 NP_sqrt_base = (-NP0*n212 - n19*(-n42*n43*xF[0]/(n43 - 1 + pow(alpha, -n2*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n48*xF[3]/(n48 - 1 + pow(alpha, -n8*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n50*xF[5]/(n50 - 1 + pow(alpha, -n10*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n52*xF[7]/(n52 - 1 + pow(alpha, -n12*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n63/(n47 - 1 + pow(alpha, -n7*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n66/(n44 - 1 + pow(alpha, -n6*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n67/(n49 - 1 + pow(alpha, -n9*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n68/(n51 - 1 + pow(alpha, -n11*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1)))) + n42*n43*xF[0]/n109 - pow(NP0, -n1)*(n0*n137*n198*n42 - n0*n143 - n0*n19*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) - n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) - n138*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78)*(pow(alpha, NP0*n2 - n12*n92)*n12*n30*n79/n88 + n30*n73) - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 - n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69)*(pow(alpha, NP0*n2 - n11*n92)*n11*n30*n79/n88 + n30*n69)/n123 + n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65)*(pow(alpha, NP0*n2 - n10*n92)*n10*n30*n79/n88 + n30*n65)/n122 - n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72)*(pow(alpha, NP0*n2 - n9*n92)*n30*n79*n9/n88 + n30*n72)/n121 - n42*n48*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70)*(pow(alpha, NP0*n2 - n8*n92)*n30*n79*n8/n88 + n30*n70)/n120 - n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64)*(pow(alpha, NP0*n2 - n7*n92)*n30*n7*n79/n88 + n30*n64)/n119 - n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71)*(pow(alpha, NP0*n2 - n6*n92)*n30*n6*n79/n88 + n30*n71)/n118) - n0*n196 + 1.0*n133*n154*n42*n77))*(-n1*n143 - n1*n19*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) - n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) - n138*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78)*(pow(alpha, NP0*n2 - n12*n92)*n12*n30*n79/n88 + n30*n73) - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 - n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69)*(pow(alpha, NP0*n2 - n11*n92)*n11*n30*n79/n88 + n30*n69)/n123 + n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65)*(pow(alpha, NP0*n2 - n10*n92)*n10*n30*n79/n88 + n30*n65)/n122 - n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72)*(pow(alpha, NP0*n2 - n9*n92)*n30*n79*n9/n88 + n30*n72)/n121 - n42*n48*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70)*(pow(alpha, NP0*n2 - n8*n92)*n30*n79*n8/n88 + n30*n70)/n120 - n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64)*(pow(alpha, NP0*n2 - n7*n92)*n30*n7*n79/n88 + n30*n64)/n119 - n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71)*(pow(alpha, NP0*n2 - n6*n92)*n30*n6*n79/n88 + n30*n71)/n118) - n1*n196 + 4.0*n133*n154*n42*n77 - 4.0*n137*n162*n42) + pow(-n18*(n0*n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n0*n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) + n0*xTj*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) - n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) - n138*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78)*(pow(alpha, NP0*n2 - n12*n92)*n12*n30*n79/n88 + n30*n73) - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 - n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69)*(pow(alpha, NP0*n2 - n11*n92)*n11*n30*n79/n88 + n30*n69)/n123 + n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65)*(pow(alpha, NP0*n2 - n10*n92)*n10*n30*n79/n88 + n30*n65)/n122 - n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72)*(pow(alpha, NP0*n2 - n9*n92)*n30*n79*n9/n88 + n30*n72)/n121 - n42*n48*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70)*(pow(alpha, NP0*n2 - n8*n92)*n30*n79*n8/n88 + n30*n70)/n120 - n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64)*(pow(alpha, NP0*n2 - n7*n92)*n30*n7*n79/n88 + n30*n64)/n119 - n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71)*(pow(alpha, NP0*n2 - n6*n92)*n30*n6*n79/n88 + n30*n71)/n118) + 1.0*n133*n42*n77*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77) + n151) - n212, -n1);
18169 NP_sqrt_base = fabs(NP_sqrt_base);
18170 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
18171 NT1 = n62*(n89 - log(-pow(alpha, NP1*n2)*n79 + 1));
18172 g0 = MW[1] - Mstar;
18173 g1 = MW[0] - Mstar;
18176 g4 = MW[2] - Mstar;
18177 g5 = MW[3] - Mstar;
18178 g6 = MW[4] - Mstar;
18179 g7 = MW[5] - Mstar;
18180 g8 = MW[6] - Mstar;
18181 g9 = MW[7] - Mstar;
18186 g14 = pow(alpha, -g1);
18187 g15 = pow(alpha, -g0);
18188 g16 = pow(alpha, -g4);
18189 g17 = pow(alpha, -g5);
18190 g18 = pow(alpha, -g6);
18191 g19 = pow(alpha, -g7);
18192 g20 = pow(alpha, -g8);
18193 g21 = pow(alpha, -g9);
18194 g22 = log(xF[0]/xF[1]);
18196 g24 = pow(alpha, NP1*g0);
18197 g25 = pow(alpha, NP1*g1);
18199 g27 = pow(alpha, NP1*g4);
18200 g28 = pow(alpha, NP1*g5);
18201 g29 = pow(alpha, NP1*g6);
18202 g30 = pow(alpha, NP1*g7);
18203 g31 = pow(alpha, NP1*g8);
18204 g32 = pow(alpha, NP1*g9);
18226 g54 = g11/(g3*xF[1]);
18227 g55 = pow(alpha, g0*g23) - 1;
18228 g56 = pow(alpha, g0*g23) - 1;
18229 g57 = pow(alpha, g1*g23) - 1;
18230 g58 = pow(alpha, g23*g4) - 1;
18231 g59 = pow(alpha, g23*g5) - 1;
18232 g60 = pow(alpha, g23*g6) - 1;
18233 g61 = pow(alpha, g23*g7) - 1;
18234 g62 = pow(alpha, g23*g8) - 1;
18235 g63 = pow(alpha, g23*g9) - 1;
18236 g64 = -pow(alpha, g1*g23);
18237 g65 = -pow(alpha, g23*g4);
18238 g66 = -pow(alpha, g23*g5);
18239 g67 = -pow(alpha, g23*g6);
18240 g68 = -pow(alpha, g23*g7);
18241 g69 = -pow(alpha, g23*g8);
18242 g70 = -pow(alpha, g23*g9);
18251 g79 = pow(alpha, g1*g23) + g45;
18253 g81 = pow(alpha, g23*g4) + g46;
18254 g82 = pow(alpha, g23*g5) + g47;
18255 g83 = pow(alpha, g23*g6) + g48;
18256 g84 = pow(alpha, g23*g7) + g49;
18257 g85 = pow(alpha, g23*g8) + g50;
18258 g86 = pow(alpha, g23*g9) + g51;
18291 g119 = log(g12*g54*g80/g37);
18292 g120 = log(g12*g54*g71/g36);
18293 g121 = log(g13*g34*g80/g56);
18295 g123 = log(g13*g34*g71/g55);
18297 g125 = -g122*g37*g88 - g122*g87*(g45 + 1) - g122*g89*(g46 + 1) - g122*g90*(g47 + 1) - g122*g91*(g50 + 1) - g122*g92*(g51 + 1) - g122*g93*(g48 + 1) - g122*g94*(g49 + 1) - g124*g56*g88 - g124*g87*(pow(alpha, g1*g23) - 1) - g124*g89*(pow(alpha, g23*g4) - 1) - g124*g90*(pow(alpha, g23*g5) - 1) - g124*g91*(pow(alpha, g23*g8) - 1) - g124*g92*(pow(alpha, g23*g9) - 1) - g124*g93*(pow(alpha, g23*g6) - 1) - g124*g94*(pow(alpha, g23*g7) - 1) - g52*xF[0] - g52*xF[1] - g52*xF[2] - g52*xF[3] - g52*xF[4] - g52*xF[5] - g52*xF[6] - g52*xF[7];
18298 LpF = xF[0]*(g14 + 1.0)*(g106*g120 + g112*g123 + g33)/(g26*(g14 - 1.0)) + xF[1]*(g15 + 1.0)*(g109*g120 + g111*g123 + g33)/(g26*(g15 - 1.0)) + xF[2]*(g16 + 1.0)*(g110*g120 + g114*g123 + g33)/(g26*(g16 - 1.0)) + xF[3]*(g17 + 1.0)*(g108*g120 + g115*g123 + g33)/(g26*(g17 - 1.0)) + xF[4]*(g18 + 1.0)*(g104*g120 + g116*g123 + g33)/(g26*(g18 - 1.0)) + xF[5]*(g19 + 1.0)*(g107*g120 + g113*g123 + g33)/(g26*(g19 - 1.0)) + xF[6]*(g20 + 1.0)*(g103*g120 + g117*g123 + g33)/(g26*(g20 - 1.0)) + xF[7]*(g21 + 1.0)*(g105*g120 + g118*g123 + g33)/(g26*(g21 - 1.0));
18303 xP[0] = g35*g57*g96;
18304 xP[1] = g35*g55*g95;
18305 xP[2] = g100*g35*g58;
18306 xP[3] = g102*g35*g59;
18307 xP[4] = g35*g60*g97;
18308 xP[5] = g35*g61*g98;
18309 xP[6] = g101*g35*g62;
18310 xP[7] = g35*g63*g99;
18311 xT[0] = g38*g53*g96;
18312 xT[1] = g36*g53*g95;
18313 xT[2] = g100*g39*g53;
18314 xT[3] = g102*g40*g53;
18315 xT[4] = g41*g53*g97;
18316 xT[5] = g42*g53*g98;
18317 xT[6] = g101*g43*g53;
18318 xT[7] = g44*g53*g99;
18321 n0 = MW[0] - Mstar;
18325 n4 = MW[1] - Mstar;
18326 n5 = MW[2] - Mstar;
18327 n6 = MW[3] - Mstar;
18328 n7 = MW[4] - Mstar;
18329 n8 = MW[5] - Mstar;
18330 n9 = MW[6] - Mstar;
18331 n10 = MW[7] - Mstar;
18332 n11 = MW[8] - Mstar;
18341 n20 = pow(n0, -n13);
18342 n21 = pow(n1, -n13);
18343 n22 = pow(n4, -n13);
18344 n23 = pow(n5, -n13);
18345 n24 = pow(n6, -n13);
18346 n25 = pow(n7, -n13);
18347 n26 = pow(n8, -n13);
18348 n27 = pow(n9, -n13);
18349 n28 = pow(n10, -n13);
18350 n29 = pow(n11, -n13);
18353 n32 = pow(alpha, NP0*n0);
18354 n33 = n14 + n18*xTj;
18355 n34 = n14 + n16*xTj;
18356 n35 = pow(alpha, NP0*n4);
18357 n36 = pow(alpha, NP0*n5);
18358 n37 = pow(alpha, NP0*n6);
18359 n38 = pow(alpha, NP0*n7);
18360 n39 = pow(alpha, NP0*n8);
18361 n40 = pow(alpha, NP0*n9);
18362 n41 = pow(alpha, NP0*n10);
18363 n42 = pow(alpha, NP0*n11);
18369 n48 = pow(alpha, n0*n17);
18370 n49 = pow(n33, -n13);
18371 n50 = pow(n34, -n13);
18397 n76 = log((-1.0 + xPj/xF[0])/n2);
18412 n91 = pow(n90, -n13);
18413 n92 = n12 + n30 + n43 + n76;
18415 n94 = n21*n48*n50/(n49*n91);
18416 n95 = n64*(n92 - log(n90)) + 1;
18417 n96 = pow(alpha, n0*n95);
18418 n97 = pow(alpha, n4*n95);
18419 n98 = pow(alpha, n5*n95);
18420 n99 = pow(alpha, n6*n95);
18421 n100 = pow(alpha, n7*n95);
18422 n101 = pow(alpha, n8*n95);
18423 n102 = pow(alpha, n9*n95);
18424 n103 = pow(alpha, n10*n95);
18425 n104 = pow(alpha, n11*n95);
18434 n113 = n46 - 1 + 1.0/n96;
18435 n114 = n47 - 1 + 1.0/n97;
18436 n115 = n51 - 1 + 1.0/n98;
18437 n116 = n52 - 1 + 1.0/n99;
18438 n117 = n53 - 1 + 1.0/n100;
18439 n118 = n54 - 1 + 1.0/n101;
18440 n119 = n55 - 1 + 1.0/n102;
18441 n120 = n56 - 1 + 1.0/n103;
18442 n121 = n57 - 1 + 1.0/n104;
18443 n122 = pow(n113, -n13);
18444 n123 = pow(n114, -n13);
18445 n124 = pow(n115, -n13);
18446 n125 = pow(n116, -n13);
18447 n126 = pow(n117, -n13);
18448 n127 = pow(n118, -n13);
18449 n128 = pow(n119, -n13);
18450 n129 = pow(n120, -n13);
18451 n130 = pow(n121, -n13);
18452 n131 = pow(n113, 3);
18453 n132 = pow(n114, 3);
18454 n133 = pow(n115, 3);
18455 n134 = pow(n116, 3);
18456 n135 = pow(n117, 3);
18457 n136 = pow(n118, 3);
18458 n137 = pow(n119, 3);
18459 n138 = pow(n120, 3);
18460 n139 = pow(n121, 3);
18469 n148 = n1*xF[5]/n118;
18472 n151 = n32*xF[0]/n113;
18474 n153 = n32*xF[0]/n122;
18475 n154 = n56*xF[7]/n138;
18476 n155 = n56*xF[7]/n129;
18477 n156 = n61*xF[3]/n125;
18478 n157 = n21*n26*n39*xF[5]/n118;
18479 n158 = n151*n44/n64;
18480 n159 = n18*n32*n44/(n113*n64);
18481 n160 = n151*n44*n66;
18482 n161 = n143*n44*n88;
18483 n162 = n144*n44*n82;
18484 n163 = n146*n44*n86;
18485 n164 = n145*n44*n83;
18487 n166 = n141*n44*n87;
18488 n167 = n142*n44*n85;
18489 n168 = n140*n44*n84;
18491 n170 = n81/(n90*n96) + 1;
18493 n172 = n32/n64 + n93/(n64*n96);
18494 n173 = n1*n105*n93 + n1*n72;
18495 n174 = n1*n112*n93 + n1*n67;
18496 n175 = n1*n108*n93 + n1*n71;
18497 n176 = n1*n107*n93 + n1*n73;
18498 n177 = n1*n111*n93 + n1*n68;
18499 n178 = n1*n110*n93 + n1*n70;
18500 n179 = n1*n109*n93 + n80;
18501 n180 = n1*n106*n93 + n79;
18502 n181 = pow(n172, -n13);
18503 n182 = pow(n173, -n13);
18504 n183 = pow(n174, -n13);
18505 n184 = pow(n175, -n13);
18506 n185 = pow(n176, -n13);
18507 n186 = pow(n177, -n13);
18508 n187 = pow(n178, -n13);
18509 n188 = pow(n179, -n13);
18510 n189 = pow(n180, -n13);
18513 n192 = n0*n31*n32 + n0*n31*n93/n96;
18514 n193 = n32*n66 + n66*n93/n96;
18517 n196 = n176*n60*xF[4];
18520 n199 = n178*xF[6]/n128;
18523 n202 = n181*n46*xF[0]/n131;
18524 n203 = n184*n52*xF[3]/n134;
18525 n204 = n185*n53*xF[4]/n135;
18526 n205 = n183*n51*xF[2]/n133;
18527 n206 = n182*n47*xF[1]/n132;
18528 n207 = n193*n46/n122;
18529 n208 = n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n122;
18530 n209 = n13*n18*n32*n44*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/(n122*n64);
18531 n210 = n31*n44*n72*xF[1]*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)/n123;
18532 n211 = n31*n44*n67*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)/n124;
18533 n212 = n31*n44*n71*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)/n125;
18534 n213 = n31*n44*n73*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)/n126;
18535 n214 = n31*n44*n68*xF[5]*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)/n127;
18536 n215 = n31*n44*n70*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)/n128;
18537 n216 = n31*n44*n75*xF[7]*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)/n129;
18538 n217 = n31*n44*n74*xF[8]*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)/n130;
18539 n218 = 1.0*n153*n172*n44/n64;
18540 n219 = n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122;
18541 n220 = -0.5*n207*n44*xF[0];
18542 n221 = n158 + n208;
18543 n222 = n105*n48*n50*n65/(n49*n91) + n105*n65*n93 - n22*n94/n97 + n88;
18544 n223 = n112*n48*n50*n65/(n49*n91) + n112*n65*n93 - n23*n94/n98 + n82;
18545 n224 = n107*n48*n50*n65/(n49*n91) + n107*n65*n93 + n83 - n25*n94/n100;
18546 n225 = n111*n48*n50*n65/(n49*n91) + n111*n65*n93 + n21*n26*n39 - n26*n94/n101;
18547 n226 = n110*n48*n50*n65/(n49*n91) + n110*n65*n93 + n87 - n27*n94/n102;
18548 n227 = n44*n78*(-pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n105*n65*n93 + n88)/n123;
18549 n228 = n44*n59*xF[2]*(-pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n112*n65*n93 + n82)/n124;
18550 n229 = n156*n44*(-pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n108*n65*n93 + n86);
18551 n230 = n44*n60*xF[4]*(-pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n107*n65*n93 + n83)/n126;
18552 n231 = n89*(-pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n111*n65*n93 + n21*n26*n39)/n127;
18553 n232 = n44*n58*xF[6]*(-pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n110*n65*n93 + n87)/n128;
18554 n233 = -n155*n44*(pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n109*n65*n93 + n85);
18555 n234 = n149*n44*n69*(pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n106*n65*n93 + n84);
18556 n235 = n169 + n218 + n220;
18557 n236 = n1*n141*n44*n70 + n1*n143*n44*n72 + n1*n144*n44*n67 + n1*n145*n44*n73 + n140*n44*n79 + n142*n44*n80 + n148*n44*n68 + n149*n180*n44*n69 + n150*n44*n71 - n155*n179*n44 + n156*n175*n44 + n197*n89 + n198*n44*n78 + n199*n44*n58 + n221 + n196*n44/n126 + n190*n44*n59/n124;
18559 n238 = n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 + n227 + n228 + n229 + n230 + n231 + n232 + n233 + n234;
18560 n239 = n147*n178*n44*n58*(n110*n31*n93 + n31*n70) - n154*n179*n44*(n109*n31*n93 + n31*n75) + n238 - n180*n44*n69*(n106*n31*n93 + n31*n74)/n139 + n177*n89*(n111*n31*n93 + n31*n68)/n136 + n196*n44*(n107*n31*n93 + n31*n73)/n135 + n191*n44*n61*(n108*n31*n93 + n31*n71)/n134 + n190*n44*n59*(n112*n31*n93 + n31*n67)/n133 + n173*n44*n78*(n105*n31*n93 + n31*n72)/n132 + n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131;
18561 NP_b = -n153*n171*n44/n64 - n159 - n17*(1.0*n153*n44*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n64 + n169 - 1.0*n202*n44 - 0.5*xTj*(n13*n147*n195*n44 + n13*n154*n188*n44 + n13*n200*n44*n69 + n13*n202*n44 + n13*n203*n44 + n13*n204*n44 + n13*n205*n44 + n13*n206*n44 + n13*n186*n44*n54*xF[5]/n136 + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n11*n65*n81/n90 + pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n84) - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n10*n65*n81/n90 + pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n85) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n6*n65*n81/n90 - pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n86) + n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n65*n81*n9/n90 - pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n87)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n65*n8*n81/n90 - pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n21*n26*n39)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n65*n7*n81/n90 - pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n83)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n5*n65*n81/n90 - pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n82)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n4*n65*n81/n90 - pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n88)/n123) - 0.5*n44*n46*xF[0]*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122) - n44*xTj*(n1*n141*n70 + n1*n143*n72 + n1*n144*n67 + n1*n145*n73 + n140*n79 + n142*n80 + n148*n68 + n149*n180*n69 + n150*n71 + n151/n64 - n155*n179 + n156*n175 + n197*n77 + n198*n78 + n199*n58 + n196/n126 + n190*n59/n124 + n18*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n122);
18562 NP_2a = -n44*(n13*pow(n170, -n13)*n18*n46*n48*n66/n131 - 1.0*n151*n66 + n153*n171*n66 + 1.0*xTj*(n13*n147*n195 + n13*n154*n188 + n13*n200*n69 + n13*n202 + n13*n203 + n13*n204 + n13*n205 + n13*n206 + n13*n186*n54*xF[5]/n136 + n140*n84 + n141*n87 + n142*n85 + n143*n88 + n144*n82 + n145*n83 + n146*n86 + n149*n69*(pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n106*n65*n93 + n84) + n151*n66 - n155*(pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n109*n65*n93 + n85) + n156*(-pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n108*n65*n93 + n86) + n157 + n31*n74*xF[8]*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)/n130 + n31*n75*xF[7]*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)/n129 + n31*n70*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)/n128 + n58*xF[6]*(-pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n110*n65*n93 + n87)/n128 + n31*n68*xF[5]*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)/n127 + n77*(-pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n111*n65*n93 + n21*n26*n39)/n127 + n31*n73*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)/n126 + n60*xF[4]*(-pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n107*n65*n93 + n83)/n126 + n31*n71*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)/n125 + n31*n67*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)/n124 + n59*xF[2]*(-pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n112*n65*n93 + n82)/n124 + n31*n72*xF[1]*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)/n123 + n78*(-pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n105*n65*n93 + n88)/n123 + n13*n18*n32*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/(n122*n64) + n18*n46*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122) - 2.0*n170*n48*n66*xF[0]/n122);
18563 NP_sqrt_base = (NP0*(n19*(n1*n141*n44*n70 + n1*n143*n44*n72 + n1*n144*n44*n67 + n1*n145*n44*n73 + n140*n44*n79 + n142*n44*n80 + n148*n44*n68 + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79) + n150*n44*n71 - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71) + n221 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)/n123) + n221) + n152*n44*xF[0] + xTj*(n141*n44*n58 - n142*n44*n56 + n144*n44*n59 + n145*n44*n60 + n146*n44*n61 + n152*n18*n44 - n44*n69/n121 + n89/n118 + n44*n78/n114) + pow(NP0, -n13)*(-1.0*n153*n172*n44/n64 - 0.5*n160 + 0.5*n194*n201*n44*xF[0] + 0.5*n207*n44*xF[0] + 0.5*n239*xTj))*(-n13*n19*(n147*n44*n58*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)*(pow(alpha, NP0*n0 - n9*n95)*n31*n81*n9/n90 + n31*n70) + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n11*n65*n81/n90 + pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n84) - n154*n44*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)*(pow(alpha, NP0*n0 - n10*n95)*n10*n31*n81/n90 + n31*n75) - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n10*n65*n81/n90 + pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n85) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n6*n65*n81/n90 - pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n86) + n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 - n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)*(pow(alpha, NP0*n0 - n11*n95)*n11*n31*n81/n90 + n31*n74)/n139 + n89*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)*(pow(alpha, NP0*n0 - n8*n95)*n31*n8*n81/n90 + n31*n68)/n136 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)*(pow(alpha, NP0*n0 - n7*n95)*n31*n7*n81/n90 + n31*n73)/n135 + n44*n61*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)*(pow(alpha, NP0*n0 - n6*n95)*n31*n6*n81/n90 + n31*n71)/n134 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)*(pow(alpha, NP0*n0 - n5*n95)*n31*n5*n81/n90 + n31*n67)/n133 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)*(pow(alpha, NP0*n0 - n4*n95)*n31*n4*n81/n90 + n31*n72)/n132 + n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n65*n81*n9/n90 - pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n87)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n65*n8*n81/n90 - pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n21*n26*n39)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n65*n7*n81/n90 - pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n83)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n5*n65*n81/n90 - pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n82)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n4*n65*n81/n90 - pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n88)/n123) - n13*n219 + 4.0*n153*n172*n44/n64 + 2.0*n160 - 4.0*n202*n44) + pow(-n159 - n17*(1.0*n153*n44*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n64 + n169 - 0.5*xTj*(n147*n44*n58*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)*(pow(alpha, NP0*n0 - n9*n95)*n31*n81*n9/n90 + n31*n70) + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n11*n65*n81/n90 + pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n84) - n154*n44*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)*(pow(alpha, NP0*n0 - n10*n95)*n10*n31*n81/n90 + n31*n75) - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n10*n65*n81/n90 + pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n85) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n6*n65*n81/n90 - pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n86) + n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 - n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)*(pow(alpha, NP0*n0 - n11*n95)*n11*n31*n81/n90 + n31*n74)/n139 + n89*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)*(pow(alpha, NP0*n0 - n8*n95)*n31*n8*n81/n90 + n31*n68)/n136 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)*(pow(alpha, NP0*n0 - n7*n95)*n31*n7*n81/n90 + n31*n73)/n135 + n44*n61*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)*(pow(alpha, NP0*n0 - n6*n95)*n31*n6*n81/n90 + n31*n71)/n134 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)*(pow(alpha, NP0*n0 - n5*n95)*n31*n5*n81/n90 + n31*n67)/n133 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)*(pow(alpha, NP0*n0 - n4*n95)*n31*n4*n81/n90 + n31*n72)/n132 + n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n65*n81*n9/n90 - pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n87)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n65*n8*n81/n90 - pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n21*n26*n39)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n65*n7*n81/n90 - pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n83)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n5*n65*n81/n90 - pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n82)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n4*n65*n81/n90 - pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n88)/n123) - 0.5*n44*n46*xF[0]*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131 - 0.5*n44*n46*xF[0]*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122) - n237 - n194*n44*xF[0]/n122, -n13);
18564 NP_sqrt_base = fabs(NP_sqrt_base);
18565 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
18566 NT1 = n64*(n92 - log(-pow(alpha, NP1*n0)*n81 + 1));
18567 g0 = MW[1] - Mstar;
18568 g1 = MW[0] - Mstar;
18571 g4 = MW[2] - Mstar;
18572 g5 = MW[3] - Mstar;
18573 g6 = MW[4] - Mstar;
18574 g7 = MW[5] - Mstar;
18575 g8 = MW[6] - Mstar;
18576 g9 = MW[7] - Mstar;
18577 g10 = MW[8] - Mstar;
18582 g15 = pow(alpha, -g1);
18583 g16 = pow(alpha, -g0);
18584 g17 = pow(alpha, -g4);
18585 g18 = pow(alpha, -g5);
18586 g19 = pow(alpha, -g6);
18587 g20 = pow(alpha, -g7);
18588 g21 = pow(alpha, -g8);
18589 g22 = pow(alpha, -g9);
18590 g23 = pow(alpha, -g10);
18591 g24 = log(xF[0]/xF[1]);
18593 g26 = pow(alpha, NP1*g0);
18594 g27 = pow(alpha, NP1*g1);
18596 g29 = pow(alpha, NP1*g4);
18597 g30 = pow(alpha, NP1*g5);
18598 g31 = pow(alpha, NP1*g6);
18599 g32 = pow(alpha, NP1*g7);
18600 g33 = pow(alpha, NP1*g8);
18601 g34 = pow(alpha, NP1*g9);
18602 g35 = pow(alpha, NP1*g10);
18626 g59 = g12/(g3*xF[1]);
18627 g60 = pow(alpha, g0*g25) - 1;
18628 g61 = pow(alpha, g0*g25) - 1;
18629 g62 = pow(alpha, g1*g25) - 1;
18630 g63 = pow(alpha, g25*g4) - 1;
18631 g64 = pow(alpha, g25*g5) - 1;
18632 g65 = pow(alpha, g25*g6) - 1;
18633 g66 = pow(alpha, g25*g7) - 1;
18634 g67 = pow(alpha, g25*g8) - 1;
18635 g68 = pow(alpha, g25*g9) - 1;
18636 g69 = pow(alpha, g10*g25) - 1;
18637 g70 = -pow(alpha, g1*g25);
18638 g71 = -pow(alpha, g25*g4);
18639 g72 = -pow(alpha, g25*g5);
18640 g73 = -pow(alpha, g25*g6);
18641 g74 = -pow(alpha, g25*g7);
18642 g75 = -pow(alpha, g25*g8);
18643 g76 = -pow(alpha, g25*g9);
18644 g77 = -pow(alpha, g10*g25);
18654 g87 = pow(alpha, g1*g25) + g49;
18656 g89 = pow(alpha, g25*g4) + g50;
18657 g90 = pow(alpha, g25*g5) + g51;
18658 g91 = pow(alpha, g25*g6) + g52;
18659 g92 = pow(alpha, g25*g7) + g53;
18660 g93 = pow(alpha, g25*g8) + g54;
18661 g94 = pow(alpha, g25*g9) + g55;
18662 g95 = pow(alpha, g10*g25) + g56;
18699 g132 = log(g13*g59*g88/g40);
18700 g133 = log(g13*g59*g78/g39);
18701 g134 = log(g14*g37*g88/g61);
18703 g136 = log(g14*g37*g78/g60);
18705 g138 = -g100*g135*(g51 + 1) - g100*g137*(pow(alpha, g25*g5) - 1) - g101*g135*(g54 + 1) - g101*g137*(pow(alpha, g25*g8) - 1) - g102*g135*(g55 + 1) - g102*g137*(pow(alpha, g25*g9) - 1) - g103*g135*(g52 + 1) - g103*g137*(pow(alpha, g25*g6) - 1) - g104*g135*(g53 + 1) - g104*g137*(pow(alpha, g25*g7) - 1) - g135*g40*g98 - g135*g96*(g56 + 1) - g135*g97*(g49 + 1) - g135*g99*(g50 + 1) - g137*g61*g98 - g137*g96*(pow(alpha, g10*g25) - 1) - g137*g97*(pow(alpha, g1*g25) - 1) - g137*g99*(pow(alpha, g25*g4) - 1) - g57*xF[0] - g57*xF[1] - g57*xF[2] - g57*xF[3] - g57*xF[4] - g57*xF[5] - g57*xF[6] - g57*xF[7] - g57*xF[8];
18706 LpF = xF[0]*(g15 + 1.0)*(g117*g133 + g124*g136 + g36)/(g28*(g15 - 1.0)) + xF[1]*(g16 + 1.0)*(g120*g133 + g123*g136 + g36)/(g28*(g16 - 1.0)) + xF[2]*(g17 + 1.0)*(g121*g133 + g126*g136 + g36)/(g28*(g17 - 1.0)) + xF[3]*(g18 + 1.0)*(g119*g133 + g127*g136 + g36)/(g28*(g18 - 1.0)) + xF[4]*(g19 + 1.0)*(g115*g133 + g128*g136 + g36)/(g28*(g19 - 1.0)) + xF[5]*(g20 + 1.0)*(g118*g133 + g125*g136 + g36)/(g28*(g20 - 1.0)) + xF[6]*(g21 + 1.0)*(g114*g133 + g130*g136 + g36)/(g28*(g21 - 1.0)) + xF[7]*(g22 + 1.0)*(g116*g133 + g131*g136 + g36)/(g28*(g22 - 1.0)) + xF[8]*(g23 + 1.0)*(g122*g133 + g129*g136 + g36)/(g28*(g23 - 1.0));
18711 xP[0] = g106*g38*g62;
18712 xP[1] = g105*g38*g60;
18713 xP[2] = g110*g38*g63;
18714 xP[3] = g111*g38*g64;
18715 xP[4] = g107*g38*g65;
18716 xP[5] = g108*g38*g66;
18717 xP[6] = g112*g38*g67;
18718 xP[7] = g109*g38*g68;
18719 xP[8] = g113*g38*g69;
18720 xT[0] = g106*g41*g58;
18721 xT[1] = g105*g39*g58;
18722 xT[2] = g110*g42*g58;
18723 xT[3] = g111*g43*g58;
18724 xT[4] = g107*g44*g58;
18725 xT[5] = g108*g45*g58;
18726 xT[6] = g112*g46*g58;
18727 xT[7] = g109*g47*g58;
18728 xT[8] = g113*g48*g58;
18731 n0 = MW[0] - Mstar;
18735 n4 = MW[1] - Mstar;
18736 n5 = MW[2] - Mstar;
18737 n6 = MW[3] - Mstar;
18738 n7 = MW[4] - Mstar;
18739 n8 = MW[5] - Mstar;
18740 n9 = MW[6] - Mstar;
18741 n10 = MW[7] - Mstar;
18742 n11 = MW[8] - Mstar;
18743 n12 = MW[9] - Mstar;
18752 n21 = pow(n0, -n14);
18753 n22 = pow(n1, -n14);
18754 n23 = pow(n4, -n14);
18755 n24 = pow(n5, -n14);
18756 n25 = pow(n6, -n14);
18757 n26 = pow(n7, -n14);
18758 n27 = pow(n8, -n14);
18759 n28 = pow(n9, -n14);
18760 n29 = pow(n10, -n14);
18761 n30 = pow(n11, -n14);
18762 n31 = pow(n12, -n14);
18765 n34 = pow(alpha, NP0*n0);
18766 n35 = n15 + n19*xF[0];
18767 n36 = n15 + n17*xTj;
18768 n37 = pow(alpha, NP0*n4);
18769 n38 = pow(alpha, NP0*n5);
18770 n39 = pow(alpha, NP0*n6);
18771 n40 = pow(alpha, NP0*n7);
18772 n41 = pow(alpha, NP0*n8);
18773 n42 = pow(alpha, NP0*n9);
18774 n43 = pow(alpha, NP0*n10);
18775 n44 = pow(alpha, NP0*n11);
18776 n45 = pow(alpha, NP0*n12);
18782 n51 = pow(alpha, n0*n18);
18783 n52 = pow(n35, -n14);
18784 n53 = pow(n36, -n14);
18812 n81 = log((-1.0 + xPj/xF[0])/n2);
18829 n98 = pow(n97, -n14);
18830 n99 = n13 + n32 + n46 + n81;
18831 n100 = n34*n86/n97;
18832 n101 = n64*(n99 - log(n97)) + 1;
18833 n102 = pow(alpha, n0*n101);
18834 n103 = pow(alpha, n101*n4);
18835 n104 = pow(alpha, n101*n5);
18836 n105 = pow(alpha, n101*n6);
18837 n106 = pow(alpha, n101*n7);
18838 n107 = pow(alpha, n101*n8);
18839 n108 = pow(alpha, n101*n9);
18840 n109 = pow(alpha, n10*n101);
18841 n110 = pow(alpha, n101*n11);
18842 n111 = pow(alpha, n101*n12);
18857 n126 = n49 - 1 + 1.0/n102;
18858 n127 = n50 - 1 + 1.0/n103;
18859 n128 = n54 - 1 + 1.0/n104;
18860 n129 = n55 - 1 + 1.0/n105;
18861 n130 = n56 - 1 + 1.0/n106;
18862 n131 = n57 - 1 + 1.0/n107;
18863 n132 = n58 - 1 + 1.0/n108;
18864 n133 = n59 - 1 + 1.0/n109;
18865 n134 = n60 - 1 + 1.0/n110;
18866 n135 = n61 - 1 + 1.0/n111;
18867 n136 = pow(n126, -n14);
18868 n137 = pow(n127, -n14);
18869 n138 = pow(n128, -n14);
18870 n139 = pow(n129, -n14);
18871 n140 = pow(n130, -n14);
18872 n141 = pow(n131, -n14);
18873 n142 = pow(n132, -n14);
18874 n143 = pow(n133, -n14);
18875 n144 = pow(n134, -n14);
18876 n145 = pow(n135, -n14);
18877 n146 = pow(n126, 3);
18878 n147 = pow(n127, 3);
18879 n148 = pow(n128, 3);
18880 n149 = pow(n129, 3);
18881 n150 = pow(n130, 3);
18882 n151 = pow(n131, 3);
18883 n152 = pow(n132, 3);
18884 n153 = pow(n133, 3);
18885 n154 = pow(n134, 3);
18886 n155 = pow(n135, 3);
18898 n167 = n1*xF[5]/n131;
18902 n171 = n49*xF[0]/n146;
18903 n172 = n22*n27*n41*xF[5]/n131;
18904 n173 = n0*n1*n158*n47*n62;
18905 n174 = n158*n47*n90;
18906 n175 = n162*n47*n96;
18907 n176 = n156*n47*n88;
18908 n177 = n164*n47*n94;
18909 n178 = n163*n47*n89;
18911 n180 = n160*n47*n95;
18912 n181 = n161*n47*n93;
18913 n182 = n159*n47*n91;
18914 n183 = n157*n47*n92;
18916 n185 = 1 + n86/(n102*n97);
18918 n187 = n84 + n84*n86/(n102*n97);
18919 n188 = n1*n100*n112 + n1*n76;
18920 n189 = n1*n100*n121 + n1*n69;
18921 n190 = n1*n100*n116 + n1*n75;
18922 n191 = n1*n100*n115 + n1*n77;
18923 n192 = n1*n100*n119 + n1*n70;
18924 n193 = n1*n100*n118 + n1*n74;
18925 n194 = n1*n100*n117 + n85;
18926 n195 = n1*n100*n114 + n83;
18927 n196 = n1*n100*n113 + n82;
18928 n197 = pow(n187, -n14);
18929 n198 = pow(n188, -n14);
18930 n199 = pow(n189, -n14);
18931 n200 = pow(n190, -n14);
18932 n201 = pow(n191, -n14);
18933 n202 = pow(n192, -n14);
18934 n203 = pow(n193, -n14);
18935 n204 = pow(n194, -n14);
18936 n205 = pow(n195, -n14);
18937 n206 = pow(n196, -n14);
18939 n208 = n0*n33*n34 + n100*n120*n33;
18941 n210 = n90 + n86*n90/(n102*n97);
18942 n211 = n100*n123*n48 + n21*n34*n48;
18944 n213 = n191*n56*xF[4];
18956 n225 = n193*xF[6]/n142;
18958 n227 = n191*xF[4]/n140;
18961 n230 = n201*n56*xF[4]/n150;
18962 n231 = n165*n212*n47;
18963 n232 = n0*n165*n33*n34*n47*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84);
18964 n233 = n33*n47*n76*xF[1]*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)/n137;
18965 n234 = n33*n47*n69*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)/n138;
18966 n235 = n33*n47*n75*xF[3]*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)/n139;
18967 n236 = n33*n47*n77*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)/n140;
18968 n237 = n33*n47*n70*xF[5]*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)/n141;
18969 n238 = n33*n47*n74*xF[6]*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)/n142;
18970 n239 = n33*n47*n79*xF[7]*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)/n143;
18971 n240 = n33*n47*n80*xF[8]*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)/n144;
18972 n241 = n20*n47*n82*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)/n145;
18973 n242 = 1.0*n165*n187*n47*n84;
18974 n243 = 0.5*n187*n208;
18975 n244 = n184 + n242;
18976 n245 = n100*n112*n65 + n112*n51*n53*n65/(n52*n98) + n96 + n23*n48*n51*n53/(n103*n52*n98);
18977 n246 = n100*n121*n65 + n121*n51*n53*n65/(n52*n98) + n124*n48*n51*n53/(n52*n98) + n88;
18978 n247 = n100*n116*n65 + n116*n51*n53*n65/(n52*n98) + n94 + n25*n48*n51*n53/(n105*n52*n98);
18979 n248 = n100*n115*n65 + n115*n51*n53*n65/(n52*n98) + n89 + n26*n48*n51*n53/(n106*n52*n98);
18980 n249 = n100*n119*n65 + n119*n51*n53*n65/(n52*n98) + n22*n27*n41 + n27*n48*n51*n53/(n107*n52*n98);
18981 n250 = n100*n118*n65 + n118*n51*n53*n65/(n52*n98) + n122*n48*n51*n53/(n52*n98) + n95;
18982 n251 = n100*n117*n65 + n117*n51*n53*n65/(n52*n98) + n93 + n29*n48*n51*n53/(n109*n52*n98);
18983 n252 = n100*n114*n65 + n114*n51*n53*n65/(n52*n98) + n91 + n30*n48*n51*n53/(n110*n52*n98);
18984 n253 = n100*n113*n65 + n113*n51*n53*n65/(n52*n98) + n92 + n31*n48*n51*n53/(n111*n52*n98);
18985 n254 = n63*n72*(pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n100*n112*n65 + n96)/n137;
18986 n255 = n63*n68*(pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n100*n116*n65 + n94)/n139;
18987 n256 = n56*n63*xF[4]*(pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n100*n115*n65 + n89)/n140;
18988 n257 = n63*n66*(pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n100*n119*n65 + n22*n27*n41)/n141;
18989 n258 = n63*n71*(pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n100*n117*n65 + n93)/n143;
18990 n259 = n63*n73*(pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n100*n114*n65 + n91)/n144;
18991 n260 = n63*n67*(pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n100*n113*n65 + n92)/n145;
18992 n261 = xTj*(n1*n156*n47*n69 + n1*n160*n47*n74 + n1*n162*n47*n76 + n1*n163*n47*n77 + n157*n47*n82 + n158*n47*n84 + n159*n47*n83 + n161*n47*n85 + n165*n212*n63 + n167*n47*n70 + n168*n47*n75 + n170*n207*n63 + n216*n63*n66 + n217*n63*n72 + n218*n63*n68 + n219*n63*n71 + n220*n63*n73 + n221*n63*n67 + n193*n63*n78/n142 + n213*n63/n140);
18993 n262 = n173 + n231 + n261;
18994 n263 = n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n254 + n255 + n256 + n257 + n258 + n259 + n260;
18995 n264 = n165*n215*n47 + n169*n207*n63*(n100*n121*n33 + n33*n69) + n170*n47*xF[2]*(pow(alpha, n0*n18 - n101*n5)*n0*n48*n5*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n22*n24*n53/(n52*n98) + n100*n125*n48 + n24*n38*n48) + n171*n187*n208*n63 + n263 + n196*n63*n67*(n100*n113*n33 + n12*n33*n45)/n155 + n195*n63*n73*(n100*n114*n33 + n33*n80)/n154 + n194*n63*n71*(n100*n117*n33 + n33*n79)/n153 + n193*n63*n78*(n100*n118*n33 + n33*n74)/n152 + n192*n63*n66*(n100*n119*n33 + n33*n70)/n151 + n213*n63*(n100*n115*n33 + n33*n77)/n150 + n190*n63*n68*(n100*n116*n33 + n33*n75)/n149 + n188*n63*n72*(n100*n112*n33 + n33*n76)/n147 + n47*n78*(pow(alpha, n0*n18 - n101*n9)*n0*n48*n53*n9/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n22*n28*n53/(n52*n98) + n0*n100*n118*n48 + n28*n42*n48)/n142;
18996 NP_b = -n165*n186*n47*n84 - n173 - n18*(-0.5*n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*n86/n97 + n90) + 1.0*n165*n47*n84*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84) - 1.0*n171*n197*n47 + n184 - 0.5*xTj*(n14*n169*n209*n47 + n14*n171*n197*n47 + n14*n222*n47*n71 + n14*n223*n47*n68 + n14*n224*n47*n73 + n14*n226*n47*n67 + n14*n228*n47*n72 + n14*n229*n47*n78 + n14*n230*n47 + n14*n202*n47*n66/n151 + n165*n49*n63*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*n86/n97 + n90) + n170*n63*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n5*n65*n86/n97 + pow(alpha, n0*n18 - n101*n5)*n24*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n5*n53*n65/(n52*n98) + n88) + n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n12*n65*n86/n97 + pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n92)/n145 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n11*n65*n86/n97 + pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n91)/n144 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n10*n65*n86/n97 + pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n93)/n143 + n63*n78*(pow(alpha, NP0*n0 - n101*n9)*n65*n86*n9/n97 + pow(alpha, n0*n18 - n101*n9)*n28*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n53*n65*n9/(n52*n98) + n95)/n142 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n65*n8*n86/n97 + pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n22*n27*n41)/n141 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n65*n7*n86/n97 + pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n89)/n140 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n6*n65*n86/n97 + pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n94)/n139 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n4*n65*n86/n97 + pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n96)/n137)) - n47*xTj*(n1*n156*n69 + n1*n160*n74 + n1*n162*n76 + n1*n163*n77 + n157*n82 + n158*n84 + n159*n83 + n161*n85 - n165*n212 + n166*n213 + n167*n70 + n168*n75 - n170*n207 - n216*n66 - n217*n72 - n218*n68 - n219*n71 - n220*n73 - n221*n67 - n193*n78/n142);
18997 NP_2a = -n47*(n14*n171*pow(n185, -n14)*n48*n87 - 1.0*n158*n90 - 2.0*n165*n185*n22*n87 + n165*n186*n90 + 1.0*xTj*(n0*n165*n33*n34*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84) + n14*n169*n209 + n14*n171*n197 + n14*n222*n71 + n14*n223*n68 + n14*n224*n73 + n14*n226*n67 + n14*n228*n72 + n14*n229*n78 + n14*n230 + n14*n202*n66/n151 + n156*n88 + n157*n92 + n158*n90 + n159*n91 + n160*n95 + n161*n93 + n162*n96 + n163*n89 + n164*n94 - n165*n214 + n166*n56*xF[4]*(pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n100*n115*n65 + n89) - n170*xF[2]*(pow(alpha, n0*n18 - n101*n5)*n24*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n5*n53*n65/(n52*n98) + n100*n121*n65 + n88) + n172 + n20*n82*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)/n145 - n67*(pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n100*n113*n65 + n92)/n145 + n33*n80*xF[8]*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)/n144 - n73*(pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n100*n114*n65 + n91)/n144 + n33*n79*xF[7]*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)/n143 - n71*(pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n100*n117*n65 + n93)/n143 + n33*n74*xF[6]*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)/n142 - n78*(pow(alpha, n0*n18 - n101*n9)*n28*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n53*n65*n9/(n52*n98) + n100*n118*n65 + n95)/n142 + n33*n70*xF[5]*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)/n141 - n66*(pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n100*n119*n65 + n22*n27*n41)/n141 + n33*n77*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)/n140 + n33*n75*xF[3]*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)/n139 - n68*(pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n100*n116*n65 + n94)/n139 + n33*n69*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)/n138 + n33*n76*xF[1]*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)/n137 - n72*(pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n100*n112*n65 + n96)/n137));
18998 NP_sqrt_base = (-NP0*n262 - n19*(-n47*n49*xF[0]/(n49 - 1 + pow(alpha, -n0*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n54*xF[2]/(n54 - 1 + pow(alpha, -n5*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n56*xF[4]/(n56 - 1 + pow(alpha, -n7*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n66/(n57 - 1 + pow(alpha, -n8*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n67/(n61 - 1 + pow(alpha, -n12*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n68/(n55 - 1 + pow(alpha, -n6*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n71/(n59 - 1 + pow(alpha, -n10*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n72/(n50 - 1 + pow(alpha, -n4*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n73/(n60 - 1 + pow(alpha, -n11*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n78/(n58 - 1 + pow(alpha, -n9*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1)))) - n49*n63*xF[0]/n126 - pow(NP0, -n14)*(1.0*n165*n187*n47*n84 + 0.5*n165*n215*n47 - n171*n243*n47 + 0.5*n174 - 0.5*n264*xTj))*(-n14*n19*(n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*(-n15 + n17*n19)/(n35*n97) + n21*n34*n48) + n169*n63*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)*(pow(alpha, NP0*n0 - n101*n5)*n33*n5*n86/n97 + n33*n69) + n170*n47*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n0*n48*n5*n86/n97 + pow(alpha, n0*n18 - n101*n5)*n0*n48*n5*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n22*n24*n53/(n52*n98) + n24*n38*n48) + n171*n63*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84)*(pow(alpha, NP0*n0 - n0*n101)*n0*n33*n86/n97 + n0*n33*n34) + n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)*(pow(alpha, NP0*n0 - n101*n12)*n12*n33*n86/n97 + n12*n33*n45)/n155 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)*(pow(alpha, NP0*n0 - n101*n11)*n11*n33*n86/n97 + n33*n80)/n154 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)*(pow(alpha, NP0*n0 - n10*n101)*n10*n33*n86/n97 + n33*n79)/n153 + n63*n78*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)*(pow(alpha, NP0*n0 - n101*n9)*n33*n86*n9/n97 + n33*n74)/n152 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)*(pow(alpha, NP0*n0 - n101*n8)*n33*n8*n86/n97 + n33*n70)/n151 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)*(pow(alpha, NP0*n0 - n101*n7)*n33*n7*n86/n97 + n33*n77)/n150 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)*(pow(alpha, NP0*n0 - n101*n6)*n33*n6*n86/n97 + n33*n75)/n149 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)*(pow(alpha, NP0*n0 - n101*n4)*n33*n4*n86/n97 + n33*n76)/n147 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n12*n65*n86/n97 + pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n92)/n145 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n11*n65*n86/n97 + pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n91)/n144 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n10*n65*n86/n97 + pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n93)/n143 + n47*n78*(pow(alpha, NP0*n0 - n101*n9)*n0*n48*n86*n9/n97 + pow(alpha, n0*n18 - n101*n9)*n0*n48*n53*n9/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n22*n28*n53/(n52*n98) + n28*n42*n48)/n142 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n65*n8*n86/n97 + pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n22*n27*n41)/n141 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n65*n7*n86/n97 + pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n89)/n140 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n6*n65*n86/n97 + pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n94)/n139 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n4*n65*n86/n97 + pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n96)/n137) + 4.0*n165*n187*n47*n84 + 2.0*n165*n215*n47 - 4.0*n171*n197*n47 + 2.0*n174) + pow(-n18*(0.5*n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*(-n15 + n17*n19)/(n35*n97) + n21*n34*n48) + 1.0*n165*n47*n84*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84) - 0.5*n171*n47*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84)*(pow(alpha, NP0*n0 - n0*n101)*n0*n33*n86/n97 + n0*n33*n34) + n184 - 0.5*xTj*(n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*(-n15 + n17*n19)/(n35*n97) + n21*n34*n48) + n169*n63*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)*(pow(alpha, NP0*n0 - n101*n5)*n33*n5*n86/n97 + n33*n69) + n170*n47*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n0*n48*n5*n86/n97 + pow(alpha, n0*n18 - n101*n5)*n0*n48*n5*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n22*n24*n53/(n52*n98) + n24*n38*n48) + n171*n63*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84)*(pow(alpha, NP0*n0 - n0*n101)*n0*n33*n86/n97 + n0*n33*n34) + n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)*(pow(alpha, NP0*n0 - n101*n12)*n12*n33*n86/n97 + n12*n33*n45)/n155 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)*(pow(alpha, NP0*n0 - n101*n11)*n11*n33*n86/n97 + n33*n80)/n154 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)*(pow(alpha, NP0*n0 - n10*n101)*n10*n33*n86/n97 + n33*n79)/n153 + n63*n78*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)*(pow(alpha, NP0*n0 - n101*n9)*n33*n86*n9/n97 + n33*n74)/n152 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)*(pow(alpha, NP0*n0 - n101*n8)*n33*n8*n86/n97 + n33*n70)/n151 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)*(pow(alpha, NP0*n0 - n101*n7)*n33*n7*n86/n97 + n33*n77)/n150 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)*(pow(alpha, NP0*n0 - n101*n6)*n33*n6*n86/n97 + n33*n75)/n149 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)*(pow(alpha, NP0*n0 - n101*n4)*n33*n4*n86/n97 + n33*n76)/n147 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n12*n65*n86/n97 + pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n92)/n145 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n11*n65*n86/n97 + pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n91)/n144 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n10*n65*n86/n97 + pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n93)/n143 + n47*n78*(pow(alpha, NP0*n0 - n101*n9)*n0*n48*n86*n9/n97 + pow(alpha, n0*n18 - n101*n9)*n0*n48*n53*n9/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n22*n28*n53/(n52*n98) + n28*n42*n48)/n142 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n65*n8*n86/n97 + pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n22*n27*n41)/n141 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n65*n7*n86/n97 + pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n89)/n140 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n6*n65*n86/n97 + pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n94)/n139 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n4*n65*n86/n97 + pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n96)/n137)) - n262, -n14);
18999 NP_sqrt_base = fabs(NP_sqrt_base);
19000 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
19001 NT1 = n64*(n99 - log(-pow(alpha, NP1*n0)*n86 + 1));
19002 g0 = MW[1] - Mstar;
19003 g1 = MW[0] - Mstar;
19006 g4 = MW[2] - Mstar;
19007 g5 = MW[3] - Mstar;
19008 g6 = MW[4] - Mstar;
19009 g7 = MW[5] - Mstar;
19010 g8 = MW[6] - Mstar;
19011 g9 = MW[7] - Mstar;
19012 g10 = MW[8] - Mstar;
19013 g11 = MW[9] - Mstar;
19018 g16 = pow(alpha, -g1);
19019 g17 = pow(alpha, -g0);
19020 g18 = pow(alpha, -g4);
19021 g19 = pow(alpha, -g5);
19022 g20 = pow(alpha, -g6);
19023 g21 = pow(alpha, -g7);
19024 g22 = pow(alpha, -g8);
19025 g23 = pow(alpha, -g9);
19026 g24 = pow(alpha, -g10);
19027 g25 = pow(alpha, -g11);
19028 g26 = log(xF[0]/xF[1]);
19030 g28 = pow(alpha, NP1*g0);
19031 g29 = pow(alpha, NP1*g1);
19033 g31 = pow(alpha, NP1*g4);
19034 g32 = pow(alpha, NP1*g5);
19035 g33 = pow(alpha, NP1*g6);
19036 g34 = pow(alpha, NP1*g7);
19037 g35 = pow(alpha, NP1*g8);
19038 g36 = pow(alpha, NP1*g9);
19039 g37 = pow(alpha, NP1*g10);
19040 g38 = pow(alpha, NP1*g11);
19066 g64 = g13/(g3*xF[1]);
19067 g65 = pow(alpha, g0*g27) - 1;
19068 g66 = pow(alpha, g0*g27) - 1;
19069 g67 = pow(alpha, g1*g27) - 1;
19070 g68 = pow(alpha, g27*g4) - 1;
19071 g69 = pow(alpha, g27*g5) - 1;
19072 g70 = pow(alpha, g27*g6) - 1;
19073 g71 = pow(alpha, g27*g7) - 1;
19074 g72 = pow(alpha, g27*g8) - 1;
19075 g73 = pow(alpha, g27*g9) - 1;
19076 g74 = pow(alpha, g10*g27) - 1;
19077 g75 = pow(alpha, g11*g27) - 1;
19078 g76 = -pow(alpha, g1*g27);
19079 g77 = -pow(alpha, g27*g4);
19080 g78 = -pow(alpha, g27*g5);
19081 g79 = -pow(alpha, g27*g6);
19082 g80 = -pow(alpha, g27*g7);
19083 g81 = -pow(alpha, g27*g8);
19084 g82 = -pow(alpha, g27*g9);
19085 g83 = -pow(alpha, g10*g27);
19086 g84 = -pow(alpha, g11*g27);
19097 g95 = pow(alpha, g1*g27) + g53;
19099 g97 = pow(alpha, g27*g4) + g54;
19100 g98 = pow(alpha, g27*g5) + g55;
19101 g99 = pow(alpha, g27*g6) + g56;
19102 g100 = pow(alpha, g27*g7) + g57;
19103 g101 = pow(alpha, g27*g8) + g58;
19104 g102 = pow(alpha, g27*g9) + g59;
19105 g103 = pow(alpha, g10*g27) + g60;
19106 g104 = pow(alpha, g11*g27) + g61;
19147 g145 = log(g14*g64*g96/g43);
19148 g146 = log(g14*g64*g85/g42);
19149 g147 = log(g15*g40*g96/g66);
19151 g149 = log(g15*g40*g85/g65);
19153 g151 = -g105*g148*(g61 + 1) - g105*g150*(pow(alpha, g11*g27) - 1) - g106*g148*(g60 + 1) - g106*g150*(pow(alpha, g10*g27) - 1) - g107*g148*g43 - g107*g150*g66 - g108*g148*(g54 + 1) - g108*g150*(pow(alpha, g27*g4) - 1) - g109*g148*(g55 + 1) - g109*g150*(pow(alpha, g27*g5) - 1) - g110*g148*(g58 + 1) - g110*g150*(pow(alpha, g27*g8) - 1) - g111*g148*(g59 + 1) - g111*g150*(pow(alpha, g27*g9) - 1) - g112*g148*(g56 + 1) - g112*g150*(pow(alpha, g27*g6) - 1) - g113*g148*(g57 + 1) - g113*g150*(pow(alpha, g27*g7) - 1) - g114*g148*(g53 + 1) - g114*g150*(pow(alpha, g1*g27) - 1) - g62*xF[0] - g62*xF[1] - g62*xF[2] - g62*xF[3] - g62*xF[4] - g62*xF[5] - g62*xF[6] - g62*xF[7] - g62*xF[8] - g62*xF[9];
19154 LpF = xF[0]*(g16 + 1.0)*(g129*g146 + g136*g149 + g39)/(g30*(g16 - 1.0)) + xF[1]*(g17 + 1.0)*(g132*g146 + g135*g149 + g39)/(g30*(g17 - 1.0)) + xF[2]*(g18 + 1.0)*(g133*g146 + g138*g149 + g39)/(g30*(g18 - 1.0)) + xF[3]*(g19 + 1.0)*(g131*g146 + g139*g149 + g39)/(g30*(g19 - 1.0)) + xF[4]*(g20 + 1.0)*(g127*g146 + g140*g149 + g39)/(g30*(g20 - 1.0)) + xF[5]*(g21 + 1.0)*(g130*g146 + g137*g149 + g39)/(g30*(g21 - 1.0)) + xF[6]*(g22 + 1.0)*(g125*g146 + g143*g149 + g39)/(g30*(g22 - 1.0)) + xF[7]*(g23 + 1.0)*(g128*g146 + g144*g149 + g39)/(g30*(g23 - 1.0)) + xF[8]*(g24 + 1.0)*(g134*g146 + g141*g149 + g39)/(g30*(g24 - 1.0)) + xF[9]*(g25 + 1.0)*(g126*g146 + g142*g149 + g39)/(g30*(g25 - 1.0));
19159 xP[0] = g116*g41*g67;
19160 xP[1] = g115*g41*g65;
19161 xP[2] = g121*g41*g68;
19162 xP[3] = g122*g41*g69;
19163 xP[4] = g118*g41*g70;
19164 xP[5] = g119*g41*g71;
19165 xP[6] = g123*g41*g72;
19166 xP[7] = g120*g41*g73;
19167 xP[8] = g124*g41*g74;
19168 xP[9] = g117*g41*g75;
19169 xT[0] = g116*g44*g63;
19170 xT[1] = g115*g42*g63;
19171 xT[2] = g121*g45*g63;
19172 xT[3] = g122*g46*g63;
19173 xT[4] = g118*g47*g63;
19174 xT[5] = g119*g48*g63;
19175 xT[6] = g123*g49*g63;
19176 xT[7] = g120*g50*g63;
19177 xT[8] = g124*g51*g63;
19178 xT[9] = g117*g52*g63;
19181 n0 = MW[0] - Mstar;
19185 n4 = MW[10] - Mstar;
19186 n5 = MW[1] - Mstar;
19187 n6 = MW[2] - Mstar;
19188 n7 = MW[3] - Mstar;
19189 n8 = MW[4] - Mstar;
19190 n9 = MW[5] - Mstar;
19191 n10 = MW[6] - Mstar;
19192 n11 = MW[7] - Mstar;
19193 n12 = MW[8] - Mstar;
19194 n13 = MW[9] - Mstar;
19202 n21 = pow(n0, -n15);
19203 n22 = pow(n1, -n15);
19204 n23 = pow(n4, -n15);
19205 n24 = pow(n5, -n15);
19206 n25 = pow(n6, -n15);
19207 n26 = pow(n7, -n15);
19208 n27 = pow(n8, -n15);
19209 n28 = pow(n9, -n15);
19210 n29 = pow(n10, -n15);
19211 n30 = pow(n11, -n15);
19212 n31 = pow(n12, -n15);
19213 n32 = pow(n13, -n15);
19217 n36 = pow(alpha, NP0*n0);
19218 n37 = n16 + n20*xF[0];
19219 n38 = n16 + n18*xTj;
19220 n39 = pow(alpha, NP0*n4);
19221 n40 = pow(alpha, NP0*n5);
19222 n41 = pow(alpha, NP0*n6);
19223 n42 = pow(alpha, NP0*n7);
19224 n43 = pow(alpha, NP0*n8);
19225 n44 = pow(alpha, NP0*n9);
19226 n45 = pow(alpha, NP0*n10);
19227 n46 = pow(alpha, NP0*n11);
19228 n47 = pow(alpha, NP0*n12);
19229 n48 = pow(alpha, NP0*n13);
19238 n57 = pow(alpha, n0*n19);
19239 n58 = pow(n37, -n15);
19240 n59 = pow(n38, -n15);
19272 n91 = log((-1.0 + xPj/xF[0])/n2);
19281 n100 = n22*n26*n42;
19282 n101 = n22*n29*n45;
19283 n102 = n22*n24*n40;
19284 n103 = n50*n78*xF[8];
19285 n104 = n70*n94 + 1;
19286 n105 = pow(n104, -n15);
19287 n106 = n14 + n33 + n49 + n91;
19288 n107 = n36*n94/n104;
19289 n108 = n57*n59/(n105*n58);
19291 n110 = n73*(n106 - log(n104)) + 1;
19292 n111 = pow(alpha, n0*n110);
19293 n112 = pow(alpha, n110*n4);
19294 n113 = pow(alpha, n110*n5);
19295 n114 = pow(alpha, n110*n6);
19296 n115 = pow(alpha, n110*n7);
19297 n116 = pow(alpha, n110*n8);
19298 n117 = pow(alpha, n110*n9);
19299 n118 = pow(alpha, n10*n110);
19300 n119 = pow(alpha, n11*n110);
19301 n120 = pow(alpha, n110*n12);
19302 n121 = pow(alpha, n110*n13);
19316 n135 = n55 - 1 + 1.0/n111;
19317 n136 = n56 - 1 + 1.0/n112;
19318 n137 = n60 - 1 + 1.0/n113;
19319 n138 = n61 - 1 + 1.0/n114;
19320 n139 = n62 - 1 + 1.0/n115;
19321 n140 = n63 - 1 + 1.0/n116;
19322 n141 = n64 - 1 + 1.0/n117;
19323 n142 = n65 - 1 + 1.0/n118;
19324 n143 = n66 - 1 + 1.0/n119;
19325 n144 = n67 - 1 + 1.0/n120;
19326 n145 = n68 - 1 + 1.0/n121;
19327 n146 = pow(n135, -n15);
19328 n147 = pow(n136, -n15);
19329 n148 = pow(n137, -n15);
19330 n149 = pow(n138, -n15);
19331 n150 = pow(n139, -n15);
19332 n151 = pow(n140, -n15);
19333 n152 = pow(n141, -n15);
19334 n153 = pow(n142, -n15);
19335 n154 = pow(n143, -n15);
19336 n155 = pow(n144, -n15);
19337 n156 = pow(n145, -n15);
19338 n157 = pow(n135, 3);
19339 n158 = pow(n136, 3);
19340 n159 = pow(n137, 3);
19341 n160 = pow(n138, 3);
19342 n161 = pow(n139, 3);
19343 n162 = pow(n140, 3);
19344 n163 = pow(n141, 3);
19345 n164 = pow(n142, 3);
19346 n165 = pow(n143, 3);
19347 n166 = pow(n144, 3);
19348 n167 = pow(n145, 3);
19355 n174 = xF[10]/n136;
19360 n179 = n46*xF[7]/n143;
19361 n180 = n68*xF[9]/n167;
19362 n181 = n62*xF[3]/n150;
19363 n182 = n66*xF[7]/n165;
19364 n183 = n66*xF[7]/n154;
19365 n184 = n68*xF[9]/n156;
19366 n185 = n44*n53*xF[5]/n141;
19367 n186 = 1/(n104*n111);
19368 n187 = n22*n31*n47*xF[8]/n144;
19369 n188 = n22*n28*n44*xF[5]/n141;
19370 n189 = n35*n50*n85/n135;
19371 n190 = n0*n35*n50*n70/n135;
19372 n191 = n169*n50*n97;
19373 n192 = n174*n22*n50*n92;
19374 n193 = n102*n172*n50;
19375 n194 = n170*n50*n98;
19376 n195 = n100*n175*n50;
19377 n196 = n173*n50*n96;
19379 n198 = n101*n171*n50;
19380 n199 = n179*n50*n88;
19382 n201 = n168*n50*n99;
19384 n203 = n186*n94 + 1;
19385 n204 = n1*n186*n85*n94 + n1*n85;
19386 n205 = n1*n107*n126 + n1*n80;
19387 n206 = n1*n107*n122 + n1*n84;
19388 n207 = n1*n107*n131 + n1*n76;
19389 n208 = n1*n107*n125 + n1*n82;
19390 n209 = n107*n54/n116 + n43*n54;
19391 n210 = n107*n53/n117 + n44*n53;
19392 n211 = n1*n107*n128 + n1*n81;
19393 n212 = n107*n52/n119 + n46*n52;
19394 n213 = n1*n107*n124 + n1*n78;
19395 n214 = n1*n107*n123 + n93;
19396 n215 = pow(n204, -n15);
19397 n216 = pow(n205, -n15);
19398 n217 = pow(n206, -n15);
19399 n218 = pow(n207, -n15);
19400 n219 = pow(n208, -n15);
19401 n220 = pow(n209, -n15);
19402 n221 = pow(n210, -n15);
19403 n222 = pow(n211, -n15);
19404 n223 = pow(n212, -n15);
19405 n224 = pow(n213, -n15);
19406 n225 = pow(n214, -n15);
19407 n226 = n186*n34*n85*n94 + n34*n85;
19408 n227 = n107*n21*n51/n111 + n21*n36*n51;
19409 n228 = n209*n63*xF[4];
19418 n237 = n205*xF[10]/n147;
19423 n242 = n219*n62*xF[3]/n161;
19424 n243 = n220*n63*xF[4]/n162;
19425 n244 = n232*n71*n75;
19426 n245 = n34*n50*n85*xF[0]*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146;
19427 n246 = n34*n50*n80*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)/n147;
19428 n247 = n34*n50*n84*xF[1]*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)/n148;
19429 n248 = n34*n50*n76*xF[2]*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)/n149;
19430 n249 = n34*n50*n82*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)/n150;
19431 n250 = n34*n43*n50*n8*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)/n151;
19432 n251 = n34*n50*n90*xF[5]*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)/n152;
19433 n252 = n34*n50*n81*xF[6]*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)/n153;
19434 n253 = n34*n50*n86*xF[7]*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)/n154;
19435 n254 = n103*n34*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)/n155;
19436 n255 = n13*n34*n48*n50*xF[9]*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)/n156;
19437 n256 = 1.0*n35*n50*n85*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146;
19438 n257 = n241*n50*n75;
19440 n259 = n189 + n244;
19441 n260 = n204*n226/n157;
19442 n261 = n107*n126*n72 + n108*n126*n72 + n108*n132*n51 + n22*n92;
19443 n262 = n102 + n107*n122*n72 + n108*n122*n72 + n108*n24*n51/n113;
19444 n263 = n108*n134*n51 + n109*n25/n114 + n25*n41*n51 + n131*n51*n85*n94/n104;
19445 n264 = n107*n129*n72 + n108*n129*n72 + n108*n27*n51/n116 + n96;
19446 n265 = n107*n130*n72 + n108*n130*n72 + n108*n28*n51/n117 + n22*n28*n44;
19447 n266 = n0*n108*n128*n51 + n109*n29/n118 + n29*n45*n51 + n128*n51*n85*n94/n104;
19448 n267 = n107*n124*n72 + n108*n124*n72 + n108*n31*n51/n120 + n22*n31*n47;
19449 n268 = n50*n83*(pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51 + n131*n51*n85*n94/n104)/n149;
19450 n269 = n50*n77*(pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51 + n128*n51*n85*n94/n104)/n153;
19451 n270 = n71*n87*(pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102 + n107*n122*n72)/n148;
19452 n271 = n181*n71*(pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100 + n107*n125*n72);
19453 n272 = n63*n71*xF[4]*(pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n107*n129*n72 + n96)/n151;
19454 n273 = n71*n74*(pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n107*n130*n72 + n22*n28*n44)/n152;
19455 n274 = n183*n71*(pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n107*n127*n72 + n46*n88);
19456 n275 = n71*n79*(pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n107*n124*n72 + n22*n31*n47)/n155;
19457 n276 = n202 + n256 + n258;
19458 n277 = n1*n170*n50*n76 + n1*n171*n50*n81 + n1*n172*n50*n84 + n1*n174*n50*n80 + n103*n176 + n168*n50*n93 + n173*n43*n50*n54 + n178*n50*n82 + n179*n50*n52 + n181*n208*n71 + n183*n212*n71 + n184*n214*n71 + n185*n50 + n230*n71*n74 + n231*n71*n79 + n233*n71*n77 + n234*n71*n87 + n235*n71*n83 + n237*n50*n69 + n259 + n228*n71/n151;
19459 n278 = n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n257 + n268 + n269 + n270 + n271 + n272 + n273 + n274 + n275;
19460 n279 = n180*n214*n71*(n107*n123*n34 + n13*n34*n48) + n182*n212*n71*(n107*n127*n34 + n34*n86) + n184*n50*(pow(alpha, n0*n19 - n110*n13)*n0*n13*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n22*n32*n59/(n105*n58) + n32*n48*n51 + n123*n51*n85*n94/n104) + n260*n71*n75 + n278 + n213*n71*n79*(n107*n124*n34 + n34*n78)/n166 + n211*n71*n77*(n107*n128*n34 + n34*n81)/n164 + n210*n71*n74*(n107*n130*n34 + n34*n90)/n163 + n228*n71*(n107*n129*n34 + n34*n43*n8)/n162 + n208*n62*n71*xF[3]*(n107*n125*n34 + n34*n82)/n161 + n207*n71*n83*(n107*n131*n34 + n34*n76)/n160 + n206*n71*n87*(n107*n122*n34 + n34*n84)/n159 + n205*n50*n69*xF[10]*(n107*n126*n34 + n34*n80)/n158 + n50*n89*(pow(alpha, n0*n19 - n110*n4)*n0*n4*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n22*n23*n59/(n105*n58) + n51*n92 + n126*n51*n85*n94/n104)/n147;
19461 NP_b = -n19*(n202 - 1.0*n236*n50*n75 + n256 - 0.5*xTj*(n15*n180*n225*n50 + n15*n182*n223*n50 + n15*n236*n50*n75 + n15*n238*n50*n79 + n15*n239*n50*n83 + n15*n240*n50*n87 + n15*n242*n50 + n15*n243*n50 + n15*n222*n50*n77/n164 + n15*n221*n50*n74/n163 + n15*n216*n50*n89/n158 + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n7*n72*n94/n104 + pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n11*n72*n94/n104 + pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n46*n88) + n184*n71*(pow(alpha, NP0*n0 - n110*n13)*n13*n72*n94/n104 + pow(alpha, n0*n19 - n110*n13)*n13*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n32*n51*n59/(n105*n58) + n99) + n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n12*n72*n94/n104 + pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n22*n31*n47)/n155 + n50*n77*(pow(alpha, NP0*n0 - n10*n110)*n0*n10*n51*n94/n104 + pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n72*n9*n94/n104 + pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n22*n28*n44)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n72*n8*n94/n104 + pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n96)/n151 + n50*n83*(pow(alpha, NP0*n0 - n110*n6)*n0*n51*n6*n94/n104 + pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n5*n72*n94/n104 + pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102)/n148 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n4*n72*n94/n104 + pow(alpha, n0*n19 - n110*n4)*n23*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n4*n59*n72/(n105*n58) + n22*n92)/n147 + n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) + 0.5*n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) - n190 - n229*n35*n50*n55*n85 - n50*xTj*(n1*n170*n76 + n1*n171*n81 + n1*n172*n84 + n1*n174*n80 + n168*n93 + n173*n43*n54 + n176*n78*xF[8] + n177*n228 + n178*n82 + n179*n52 - n181*n208 - n183*n212 - n184*n214 + n185 - n230*n74 - n231*n79 - n232*n75 - n233*n77 - n234*n87 - n235*n83 + n237*n69 + n35*n85/n135);
19462 NP_2a = -n50*(n15*pow(n203, -n15)*n51*n75*n95/n157 - 1.0*n169*n97 - 2.0*n22*n229*n95*xF[0] + 1.0*xTj*(n100*n175 + n101*n171 + n102*n172 + n13*n34*n48*xF[9]*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)/n156 + n15*n180*n225 + n15*n182*n223 + n15*n236*n75 + n15*n238*n79 + n15*n239*n83 + n15*n240*n87 + n15*n242 + n15*n243 + n15*n222*n77/n164 + n15*n221*n74/n163 + n15*n216*n89/n158 + n168*n99 + n169*n97 + n170*n98 + n173*n96 + n174*n22*n92 + n177*n63*xF[4]*(pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n107*n129*n72 + n96) + n179*n88 - n181*(pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100 + n107*n125*n72) - n183*(pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n107*n127*n72 + n46*n88) - n184*(pow(alpha, n0*n19 - n110*n13)*n13*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n32*n51*n59/(n105*n58) + n107*n123*n72 + n99) + n187 + n188 + n241*n75 + n34*n78*xF[8]*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)/n155 - n79*(pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n107*n124*n72 + n22*n31*n47)/n155 + n34*n86*xF[7]*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)/n154 + n34*n81*xF[6]*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)/n153 + n77*(pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51 + n128*n51*n85*n94/n104)/n153 + n34*n90*xF[5]*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)/n152 - n74*(pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n107*n130*n72 + n22*n28*n44)/n152 + n34*n43*n8*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)/n151 + n34*n82*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)/n150 + n34*n76*xF[2]*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)/n149 + n83*(pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51 + n131*n51*n85*n94/n104)/n149 + n34*n84*xF[1]*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)/n148 - n87*(pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102 + n107*n122*n72)/n148 + n34*n80*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)/n147 + n69*xF[10]*(pow(alpha, n0*n19 - n110*n4)*n23*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n4*n59*n72/(n105*n58) + n107*n126*n72 + n22*n92)/n147 + n34*n85*xF[0]*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146) + n21*n36*n51*n75*(n186*(-n16 + xPj*xTj)/n37 - 1)/n146);
19463 NP_sqrt_base = (NP0*(n20*(n1*n170*n50*n76 + n1*n171*n50*n81 + n1*n172*n50*n84 + n1*n174*n50*n80 + n103*n176 + n168*n50*n93 + n173*n43*n50*n54 + n178*n50*n82 + n179*n50*n52 + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52) + n184*n71*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93) + n185*n50 + n189 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)/n155 + n71*n77*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)/n151 + n71*n83*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)/n148 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)/n147 + n71*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146) + n259) + xTj*(n168*n68*n71 + n173*n63*n71 + n174*n50*n69 + n175*n62*n71 + n71*n79/n144 + n66*n71*xF[7]/n143 + n71*n77/n142 + n71*n74/n141 + n71*n83/n138 + n71*n87/n137 + n71*n75/n135) + n50*n75/n135 + pow(NP0, -n15)*(-0.5*n191 - 0.5*n257 + 0.5*n260*n50*n75 + 0.5*n279*xTj - 1.0*n35*n50*n85*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146))*(-n15*n20*(n180*n71*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)*(pow(alpha, NP0*n0 - n110*n13)*n13*n34*n94/n104 + n13*n34*n48) + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n7*n72*n94/n104 + pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100) + n182*n71*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)*(pow(alpha, NP0*n0 - n11*n110)*n11*n34*n94/n104 + n34*n86) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n11*n72*n94/n104 + pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n46*n88) + n184*n50*(pow(alpha, NP0*n0 - n110*n13)*n0*n13*n51*n94/n104 + pow(alpha, n0*n19 - n110*n13)*n0*n13*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n22*n32*n59/(n105*n58) + n32*n48*n51) + n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)*(pow(alpha, NP0*n0 - n110*n12)*n12*n34*n94/n104 + n34*n78)/n166 + n71*n77*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)*(pow(alpha, NP0*n0 - n10*n110)*n10*n34*n94/n104 + n34*n81)/n164 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)*(pow(alpha, NP0*n0 - n110*n9)*n34*n9*n94/n104 + n34*n90)/n163 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)*(pow(alpha, NP0*n0 - n110*n8)*n34*n8*n94/n104 + n34*n43*n8)/n162 + n62*n71*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)*(pow(alpha, NP0*n0 - n110*n7)*n34*n7*n94/n104 + n34*n82)/n161 + n71*n83*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)*(pow(alpha, NP0*n0 - n110*n6)*n34*n6*n94/n104 + n34*n76)/n160 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)*(pow(alpha, NP0*n0 - n110*n5)*n34*n5*n94/n104 + n34*n84)/n159 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)*(pow(alpha, NP0*n0 - n110*n4)*n34*n4*n94/n104 + n34*n80)/n158 + n71*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)*(pow(alpha, NP0*n0 - n0*n110)*n0*n34*n94/n104 + n34*n85)/n157 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n12*n72*n94/n104 + pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n22*n31*n47)/n155 + n50*n77*(pow(alpha, NP0*n0 - n10*n110)*n0*n10*n51*n94/n104 + pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n72*n9*n94/n104 + pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n22*n28*n44)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n72*n8*n94/n104 + pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n96)/n151 + n50*n83*(pow(alpha, NP0*n0 - n110*n6)*n0*n51*n6*n94/n104 + pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n5*n72*n94/n104 + pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102)/n148 + n50*n89*(pow(alpha, NP0*n0 - n110*n4)*n0*n4*n51*n94/n104 + pow(alpha, n0*n19 - n110*n4)*n0*n4*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n22*n23*n59/(n105*n58) + n51*n92)/n147 + n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) + 2.0*n191 - 4.0*n236*n50*n75 + 2.0*n257 + 4.0*n35*n50*n85*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146) + pow(-n19*(n202 + n256 - 0.5*xTj*(n180*n71*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)*(pow(alpha, NP0*n0 - n110*n13)*n13*n34*n94/n104 + n13*n34*n48) + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n7*n72*n94/n104 + pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100) + n182*n71*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)*(pow(alpha, NP0*n0 - n11*n110)*n11*n34*n94/n104 + n34*n86) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n11*n72*n94/n104 + pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n46*n88) + n184*n50*(pow(alpha, NP0*n0 - n110*n13)*n0*n13*n51*n94/n104 + pow(alpha, n0*n19 - n110*n13)*n0*n13*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n22*n32*n59/(n105*n58) + n32*n48*n51) + n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)*(pow(alpha, NP0*n0 - n110*n12)*n12*n34*n94/n104 + n34*n78)/n166 + n71*n77*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)*(pow(alpha, NP0*n0 - n10*n110)*n10*n34*n94/n104 + n34*n81)/n164 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)*(pow(alpha, NP0*n0 - n110*n9)*n34*n9*n94/n104 + n34*n90)/n163 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)*(pow(alpha, NP0*n0 - n110*n8)*n34*n8*n94/n104 + n34*n43*n8)/n162 + n62*n71*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)*(pow(alpha, NP0*n0 - n110*n7)*n34*n7*n94/n104 + n34*n82)/n161 + n71*n83*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)*(pow(alpha, NP0*n0 - n110*n6)*n34*n6*n94/n104 + n34*n76)/n160 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)*(pow(alpha, NP0*n0 - n110*n5)*n34*n5*n94/n104 + n34*n84)/n159 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)*(pow(alpha, NP0*n0 - n110*n4)*n34*n4*n94/n104 + n34*n80)/n158 + n71*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)*(pow(alpha, NP0*n0 - n0*n110)*n0*n34*n94/n104 + n34*n85)/n157 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n12*n72*n94/n104 + pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n22*n31*n47)/n155 + n50*n77*(pow(alpha, NP0*n0 - n10*n110)*n0*n10*n51*n94/n104 + pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n72*n9*n94/n104 + pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n22*n28*n44)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n72*n8*n94/n104 + pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n96)/n151 + n50*n83*(pow(alpha, NP0*n0 - n110*n6)*n0*n51*n6*n94/n104 + pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n5*n72*n94/n104 + pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102)/n148 + n50*n89*(pow(alpha, NP0*n0 - n110*n4)*n0*n4*n51*n94/n104 + pow(alpha, n0*n19 - n110*n4)*n0*n4*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n22*n23*n59/(n105*n58) + n51*n92)/n147 + n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) - 0.5*n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)*(pow(alpha, NP0*n0 - n0*n110)*n0*n34*n94/n104 + n34*n85)/n157 + 0.5*n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) - n190 - n232*n50*n75 - n277*xTj, -n15);
19464 NP_sqrt_base = fabs(NP_sqrt_base);
19465 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
19466 NT1 = n73*(n106 - log(-pow(alpha, NP1*n0)*n94 + 1));
19467 g0 = MW[1] - Mstar;
19468 g1 = MW[0] - Mstar;
19471 g4 = MW[10] - Mstar;
19472 g5 = MW[2] - Mstar;
19473 g6 = MW[3] - Mstar;
19474 g7 = MW[4] - Mstar;
19475 g8 = MW[5] - Mstar;
19476 g9 = MW[6] - Mstar;
19477 g10 = MW[7] - Mstar;
19478 g11 = MW[8] - Mstar;
19479 g12 = MW[9] - Mstar;
19484 g17 = pow(alpha, -g1);
19485 g18 = pow(alpha, -g4);
19486 g19 = pow(alpha, -g0);
19487 g20 = pow(alpha, -g5);
19488 g21 = pow(alpha, -g6);
19489 g22 = pow(alpha, -g7);
19490 g23 = pow(alpha, -g8);
19491 g24 = pow(alpha, -g9);
19492 g25 = pow(alpha, -g10);
19493 g26 = pow(alpha, -g11);
19494 g27 = pow(alpha, -g12);
19495 g28 = log(xF[0]/xF[1]);
19497 g30 = pow(alpha, NP1*g0);
19498 g31 = pow(alpha, NP1*g1);
19499 g32 = pow(alpha, NP1*g4);
19501 g34 = pow(alpha, NP1*g5);
19502 g35 = pow(alpha, NP1*g6);
19503 g36 = pow(alpha, NP1*g7);
19504 g37 = pow(alpha, NP1*g8);
19505 g38 = pow(alpha, NP1*g9);
19506 g39 = pow(alpha, NP1*g10);
19507 g40 = pow(alpha, NP1*g11);
19508 g41 = pow(alpha, NP1*g12);
19536 g69 = g14/(g3*xF[1]);
19537 g70 = pow(alpha, g0*g29) - 1;
19538 g71 = pow(alpha, g0*g29) - 1;
19539 g72 = pow(alpha, g1*g29) - 1;
19540 g73 = pow(alpha, g29*g5) - 1;
19541 g74 = pow(alpha, g29*g6) - 1;
19542 g75 = pow(alpha, g29*g7) - 1;
19543 g76 = pow(alpha, g29*g8) - 1;
19544 g77 = pow(alpha, g29*g9) - 1;
19545 g78 = pow(alpha, g10*g29) - 1;
19546 g79 = pow(alpha, g11*g29) - 1;
19547 g80 = pow(alpha, g12*g29) - 1;
19548 g81 = pow(alpha, g29*g4) - 1;
19549 g82 = -pow(alpha, g1*g29);
19550 g83 = -pow(alpha, g29*g4);
19551 g84 = -pow(alpha, g29*g5);
19552 g85 = -pow(alpha, g29*g6);
19553 g86 = -pow(alpha, g29*g7);
19554 g87 = -pow(alpha, g29*g8);
19555 g88 = -pow(alpha, g29*g9);
19556 g89 = -pow(alpha, g10*g29);
19557 g90 = -pow(alpha, g11*g29);
19558 g91 = -pow(alpha, g12*g29);
19570 g103 = pow(alpha, g1*g29) + g57;
19572 g105 = pow(alpha, g29*g4) + g58;
19573 g106 = pow(alpha, g29*g5) + g59;
19574 g107 = pow(alpha, g29*g6) + g60;
19575 g108 = pow(alpha, g29*g7) + g61;
19576 g109 = pow(alpha, g29*g8) + g62;
19577 g110 = pow(alpha, g29*g9) + g63;
19578 g111 = pow(alpha, g10*g29) + g64;
19579 g112 = pow(alpha, g11*g29) + g65;
19580 g113 = pow(alpha, g12*g29) + g66;
19584 g117 = xF[10]/g105;
19625 g158 = log(g104*g15*g69/g46);
19626 g159 = log(g15*g69*g92/g45);
19627 g160 = log(g104*g16*g43/g71);
19629 g162 = log(g16*g43*g92/g70);
19631 g164 = -g114*g161*(g66 + 1) - g114*g163*(pow(alpha, g12*g29) - 1) - g115*g161*(g65 + 1) - g115*g163*(pow(alpha, g11*g29) - 1) - g116*g161*g46 - g116*g163*g71 - g117*g161*(g58 + 1) - g117*g163*(pow(alpha, g29*g4) - 1) - g118*g161*(g60 + 1) - g118*g163*(pow(alpha, g29*g6) - 1) - g119*g161*(g63 + 1) - g119*g163*(pow(alpha, g29*g9) - 1) - g120*g161*(g64 + 1) - g120*g163*(pow(alpha, g10*g29) - 1) - g121*g161*(g61 + 1) - g121*g163*(pow(alpha, g29*g7) - 1) - g122*g161*(g62 + 1) - g122*g163*(pow(alpha, g29*g8) - 1) - g123*g161*(g59 + 1) - g123*g163*(pow(alpha, g29*g5) - 1) - g124*g161*(g57 + 1) - g124*g163*(pow(alpha, g1*g29) - 1) - g67*xF[0] - g67*xF[10] - g67*xF[1] - g67*xF[2] - g67*xF[3] - g67*xF[4] - g67*xF[5] - g67*xF[6] - g67*xF[7] - g67*xF[8] - g67*xF[9];
19632 LpF = xF[0]*(g17 + 1.0)*(g140*g159 + g148*g162 + g42)/(g33*(g17 - 1.0)) + xF[10]*(g18 + 1.0)*(g145*g159 + g157*g162 + g42)/(g33*(g18 - 1.0)) + xF[1]*(g19 + 1.0)*(g143*g159 + g147*g162 + g42)/(g33*(g19 - 1.0)) + xF[2]*(g20 + 1.0)*(g144*g159 + g150*g162 + g42)/(g33*(g20 - 1.0)) + xF[3]*(g21 + 1.0)*(g142*g159 + g151*g162 + g42)/(g33*(g21 - 1.0)) + xF[4]*(g22 + 1.0)*(g138*g159 + g152*g162 + g42)/(g33*(g22 - 1.0)) + xF[5]*(g23 + 1.0)*(g141*g159 + g149*g162 + g42)/(g33*(g23 - 1.0)) + xF[6]*(g24 + 1.0)*(g136*g159 + g155*g162 + g42)/(g33*(g24 - 1.0)) + xF[7]*(g25 + 1.0)*(g139*g159 + g156*g162 + g42)/(g33*(g25 - 1.0)) + xF[8]*(g26 + 1.0)*(g146*g159 + g153*g162 + g42)/(g33*(g26 - 1.0)) + xF[9]*(g27 + 1.0)*(g137*g159 + g154*g162 + g42)/(g33*(g27 - 1.0));
19637 xP[0] = g126*g44*g72;
19638 xP[1] = g125*g44*g70;
19639 xP[2] = g131*g44*g73;
19640 xP[3] = g132*g44*g74;
19641 xP[4] = g128*g44*g75;
19642 xP[5] = g129*g44*g76;
19643 xP[6] = g133*g44*g77;
19644 xP[7] = g130*g44*g78;
19645 xP[8] = g134*g44*g79;
19646 xP[9] = g127*g44*g80;
19647 xP[10] = g135*g44*g81;
19648 xT[0] = g126*g47*g68;
19649 xT[1] = g125*g45*g68;
19650 xT[2] = g131*g48*g68;
19651 xT[3] = g132*g49*g68;
19652 xT[4] = g128*g50*g68;
19653 xT[5] = g129*g51*g68;
19654 xT[6] = g133*g52*g68;
19655 xT[7] = g130*g53*g68;
19656 xT[8] = g134*g54*g68;
19657 xT[9] = g127*g55*g68;
19658 xT[10] = g135*g56*g68;
19661 n0 = -2.00000000000000;
19662 n1 = MW[0] - Mstar;
19666 n5 = MW[10] - Mstar;
19667 n6 = MW[11] - Mstar;
19668 n7 = MW[1] - Mstar;
19669 n8 = MW[2] - Mstar;
19670 n9 = MW[3] - Mstar;
19671 n10 = MW[4] - Mstar;
19672 n11 = MW[5] - Mstar;
19673 n12 = MW[6] - Mstar;
19674 n13 = MW[7] - Mstar;
19675 n14 = MW[8] - Mstar;
19676 n15 = MW[9] - Mstar;
19687 n26 = pow(n1, -n0);
19688 n27 = pow(n2, -n0);
19689 n28 = pow(n5, -n0);
19690 n29 = pow(n6, -n0);
19691 n30 = pow(n7, -n0);
19692 n31 = pow(n8, -n0);
19693 n32 = pow(n9, -n0);
19694 n33 = pow(n10, -n0);
19695 n34 = pow(n11, -n0);
19696 n35 = pow(n12, -n0);
19697 n36 = pow(n13, -n0);
19698 n37 = pow(n14, -n0);
19699 n38 = pow(n15, -n0);
19703 n42 = pow(alpha, NP0*n1);
19704 n43 = n19 + n21*xF[0];
19705 n44 = n19 + n21*xPj;
19706 n45 = pow(alpha, NP0*n5);
19707 n46 = pow(alpha, NP0*n6);
19708 n47 = pow(alpha, NP0*n7);
19709 n48 = pow(alpha, NP0*n8);
19710 n49 = pow(alpha, NP0*n9);
19711 n50 = pow(alpha, NP0*n10);
19712 n51 = pow(alpha, NP0*n11);
19713 n52 = pow(alpha, NP0*n12);
19714 n53 = pow(alpha, NP0*n13);
19715 n54 = pow(alpha, NP0*n14);
19716 n55 = pow(alpha, NP0*n15);
19724 n63 = pow(alpha, NP0*n0*n17);
19725 n64 = pow(n44, -n0);
19766 n105 = log((-1.0 + xPj/xF[0])/n3);
19774 n113 = n27*n29*n46;
19775 n114 = n27*n31*n48;
19776 n115 = n27*n37*n54;
19777 n116 = n27*n28*n45;
19778 n117 = n27*n32*n49;
19779 n118 = n111*n78 + 1;
19780 n119 = n105 + n16 + n39 + n56;
19781 n120 = n111*n42/n118;
19782 n121 = n85*(n119 - log(n118)) + 1;
19783 n122 = pow(alpha, n1*n121);
19784 n123 = pow(alpha, n121*n5);
19785 n124 = pow(alpha, n121*n6);
19786 n125 = pow(alpha, n121*n7);
19787 n126 = pow(alpha, n121*n8);
19788 n127 = pow(alpha, n121*n9);
19789 n128 = pow(alpha, n10*n121);
19790 n129 = pow(alpha, n11*n121);
19791 n130 = pow(alpha, n12*n121);
19792 n131 = pow(alpha, n121*n13);
19793 n132 = pow(alpha, n121*n14);
19794 n133 = pow(alpha, n121*n15);
19808 n147 = pow(alpha, n121*n17) + n61 - 1;
19809 n148 = n62 - 1 + 1.0/n123;
19810 n149 = n65 - 1 + 1.0/n124;
19811 n150 = n66 - 1 + 1.0/n125;
19812 n151 = n67 - 1 + 1.0/n126;
19813 n152 = n68 - 1 + 1.0/n127;
19814 n153 = n69 - 1 + 1.0/n128;
19815 n154 = n70 - 1 + 1.0/n129;
19816 n155 = n71 - 1 + 1.0/n130;
19817 n156 = n72 - 1 + 1.0/n131;
19818 n157 = n73 - 1 + 1.0/n132;
19819 n158 = n74 - 1 + 1.0/n133;
19820 n159 = pow(n147, 3);
19821 n160 = pow(n148, 3);
19822 n161 = pow(n149, 3);
19823 n162 = pow(n150, 3);
19824 n163 = pow(n151, 3);
19825 n164 = pow(n152, 3);
19826 n165 = pow(n153, 3);
19827 n166 = pow(n154, 3);
19828 n167 = pow(n155, 3);
19829 n168 = pow(n156, 3);
19830 n169 = pow(n157, 3);
19831 n170 = pow(n158, 3);
19833 n172 = xF[10]/n148;
19835 n174 = xF[11]/n149;
19840 n179 = pow(n148, n18)*xF[10];
19842 n181 = n2*xF[4]/n153;
19844 n183 = pow(n147, n18)*n2;
19845 n184 = n2*xF[6]/n155;
19846 n185 = n51*xF[5]/n154;
19847 n186 = n47*xF[1]/n150;
19848 n187 = n53*xF[7]/n156;
19849 n188 = pow(n147, n18)*n61;
19851 n190 = n61*xF[0]/n159;
19852 n191 = -pow(n154, n18)*n98;
19853 n192 = -n72*xF[7]/n168;
19854 n193 = -pow(n150, n18)*n66*xF[1];
19855 n194 = -pow(n156, n18)*n72*xF[7];
19856 n195 = n175*n2*n97;
19857 n196 = n103*n173*n55;
19858 n197 = n27*n33*n50*xF[4]/n153;
19859 n198 = n27*n35*n52*xF[6]/n155;
19860 n199 = n17*n171*n2*n42*n57;
19861 n200 = n112*n171*n57;
19862 n201 = n116*n172*n57;
19863 n202 = n113*n174*n57;
19864 n203 = n186*n57*n99;
19865 n204 = n114*n175*n57;
19866 n205 = n117*n177*n57;
19868 n207 = n185*n57*n91;
19870 n209 = n187*n57*n95;
19871 n210 = n115*n176*n57;
19874 n213 = n111/(n118*n122);
19877 n216 = n2*n213*n89 + n2*n89;
19878 n217 = n120*n144*n2 + n2*n93;
19879 n218 = n110 + n120*n140*n2;
19880 n219 = n120*n59/n125 + n47*n59;
19881 n220 = n120*n142*n2 + n2*n97;
19882 n221 = n104*n2 + n120*n137*n2;
19883 n222 = n120*n134*n2 + n2*n92;
19884 n223 = n120*n58/n129 + n51*n58;
19885 n224 = n120*n138*n2 + n2*n88;
19886 n225 = n120*n60/n131 + n53*n60;
19887 n226 = n120*n139*n2 + n2*n90;
19888 n227 = n120*n136*n2 + n2*n87;
19889 n228 = pow(n216, -n0);
19890 n229 = pow(n217, -n0);
19891 n230 = pow(n218, -n0);
19892 n231 = pow(n219, -n0);
19893 n232 = pow(n220, -n0);
19894 n233 = pow(n221, -n0);
19895 n234 = pow(n222, -n0);
19896 n235 = pow(n223, -n0);
19897 n236 = pow(n224, -n0);
19898 n237 = pow(n225, -n0);
19899 n238 = pow(n226, -n0);
19900 n239 = pow(n227, -n0);
19904 n243 = n0*n120*n17*n2/n122 + n0*n17*n2*n42;
19905 n244 = n101*n213*n78 + n101*n78;
19907 n246 = pow(n152, n18)*n221;
19908 n247 = pow(n149, n18)*n218;
19909 n248 = pow(n158, n18)*n227;
19910 n249 = pow(n157, n18)*n226;
19911 n250 = pow(n155, n18)*n224*xF[6];
19914 n253 = pow(n156, n18)*n225*xF[7];
19915 n254 = pow(n151, n18)*n220*xF[2];
19916 n255 = pow(n153, n18)*n242*n77;
19917 n256 = n234*n69*xF[4]/n165;
19918 n257 = n188*n240*n57;
19919 n258 = n0*n17*n183*n42*n57*xF[0]*(pow(alpha, NP0*n1 + n121*n17)*n1*n111*n2/n118 + n2*n89);
19920 n259 = n179*n40*n57*n93*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93);
19921 n260 = n110*pow(n149, n18)*n22*n57*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110);
19922 n261 = n100*pow(n150, n18)*n40*n57*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59);
19923 n262 = pow(n151, n18)*n40*n57*n97*xF[2]*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97);
19924 n263 = n108*pow(n152, n18)*n40*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2);
19925 n264 = pow(n153, n18)*n40*n57*n92*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92);
19926 n265 = n11*pow(n154, n18)*n40*n51*n57*xF[5]*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58);
19927 n266 = pow(n155, n18)*n40*n57*n88*xF[6]*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88);
19928 n267 = n102*pow(n156, n18)*n40*n57*xF[7]*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60);
19929 n268 = pow(n157, n18)*n40*n57*n90*xF[8]*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90);
19930 n269 = pow(n158, n18)*n40*n57*n87*xF[9]*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87);
19931 n270 = 1.0*n183*n240*n57*n89;
19932 n271 = n188*n245*n57;
19934 n273 = pow(alpha, n1*n24)*pow(n118, n18)*n142*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64/n126 + n120*n142*n17*n27 + n27*n31*n80;
19935 n274 = pow(alpha, n1*n24)*pow(n118, n18)*n137*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64/n127 + n117 + n120*n137*n84;
19936 n275 = pow(alpha, n1*n24)*pow(n118, n18)*n134*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64/n128 + n120*n134*n84 + n27*n33*n50;
19937 n276 = pow(alpha, n1*n24)*pow(n118, n18)*n138*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64/n130 + n120*n138*n17*n27 + n27*n35*n82;
19938 n277 = pow(alpha, n1*n24)*pow(n118, n18)*n139*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64/n132 + n115 + n120*n139*n84;
19939 n278 = -pow(alpha, n1*n24)*n103*pow(n118, n18)*pow(n43, n18)*n64/n133 + pow(alpha, n1*n24)*pow(n118, n18)*n136*pow(n43, n18)*n64*n84 + n103*n55 + n120*n136*n84;
19940 n279 = pow(n151, n18)*n57*n96*(pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n120*n142*n17*n27 + n27*n31*n80);
19941 n280 = pow(n155, n18)*n57*n94*(pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n120*n138*n17*n27 + n27*n35*n82);
19942 n281 = n179*n57*n76*(-pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116 + n120*n144*n84);
19943 n282 = n193*n57*(pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n120*n141*n84 + n47*n99);
19944 n283 = n106*pow(n152, n18)*n57*(-pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117 + n120*n137*n84);
19945 n284 = pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n120*n134*n84 + n27*n33*n50);
19946 n285 = n191*n57*(pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n120*n145*n84 + n51*n91);
19947 n286 = n194*n57*(pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n120*n135*n84 + n53*n95);
19948 n287 = n109*pow(n157, n18)*n57*(pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115 + n120*n139*n84);
19949 n288 = n212 + n270 + n272;
19950 n289 = xTj*(n106*n246*n57 + n107*n248*n57 + n108*n180*n57 + n109*n249*n57 + n110*n174*n57 - pow(n151, n18)*n220*n57*n96 + n171*n2*n57*n89 + n172*n2*n57*n93 + n173*n2*n57*n87 + n176*n2*n57*n90 + n179*n217*n57*n76 + n181*n57*n92 + n184*n57*n88 + n185*n57*n58 + n186*n57*n59 + n187*n57*n60 + n188*n25*n57*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + n191*n223*n57 + n193*n219*n57 + n194*n225*n57 + n195*n57 - n247*n57*n86 + n250*n57*n75 + n255*n57);
19951 n290 = n199 + n257 + n289;
19952 n291 = n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 + n271 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287;
19953 n292 = n106*n221*n57*(n104*n40 + n120*n137*n40)/n164 + n107*pow(n158, n18)*n57*(-pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55 + n120*n136*n84) + n107*n227*n57*(n120*n136*n40 + n40*n87)/n170 + n109*n226*n57*(n120*n139*n40 + n40*n90)/n169 - pow(n149, n18)*n57*n86*(-pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113 + n120*n140*n84) + n178*n224*n57*n75*(n120*n138*n40 + n40*n88) + n182*n218*n57*n86*(n120*n140*n40 + n40*n46*n6) + n189*n241*n57*(n100*n40 + n120*n141*n40) + n192*n225*n57*(n102*n40 + n120*n135*n40) + n291 - n223*n57*n98*(n11*n40*n51 + n120*n145*n40)/n166 + n242*n57*n77*(n120*n134*n40 + n40*n92)/n165 - n220*n57*n96*(n120*n142*n40 + n40*n97)/n163 + n217*n57*n76*xF[10]*(n120*n144*n40 + n40*n93)/n160 + n25*n57*n61*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42)/n159;
19954 NP_b = -n183*n215*n57*n61*n89 - n199 - n24*(1.0*n183*n57*n89*xF[0]*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + 0.5*n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) - 1.0*n190*n228*n57 + n212 - 0.5*xTj*(n106*pow(n152, n18)*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n84*n9/n118 - pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117) + n109*pow(n157, n18)*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n84/n118 + pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115) + pow(n149, n18)*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n17*n27*n6/n118 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n17*n27*pow(n43, n18)*n6*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + n27*n29*n79) + pow(n151, n18)*n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n17*n27*n8/n118 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n27*n31*n80) + pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n84/n118 + pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n27*n33*n50) + pow(n155, n18)*n57*n94*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n17*n27/n118 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n27*n35*n82) + pow(n158, n18)*n57*n74*xF[9]*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n17*n27/n118 + pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*n17*n27*pow(n43, n18)*n64 + n103*n83) + n179*n57*n76*(pow(alpha, NP0*n1 - n121*n5)*n111*n5*n84/n118 - pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116) + n18*n190*n228*n57 + n18*n251*n57*n96 + n18*n252*n57*n98 + n18*n256*n57 + n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) + n191*n57*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n84/n118 + pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n51*n91) + n193*n57*(pow(alpha, NP0*n1 - n121*n7)*n111*n7*n84/n118 + pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n47*n99) + n194*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n84/n118 + pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n53*n95) + n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 + n18*n239*n57*n74*xF[9]/n170 + n18*n238*n57*n73*xF[8]/n169 + n18*n237*n57*n72*xF[7]/n168 + n18*n236*n57*n94/n167 + n18*n233*n57*n68*xF[3]/n164 + n18*n231*n57*n66*xF[1]/n162 + n18*n230*n57*n86/n161 + n18*n229*n57*n62*xF[10]/n160)) - n57*xTj*(n106*n246 + n107*n248 + n108*n180 + n109*n249 + n110*n174 - pow(n151, n18)*n220*n96 + n171*n2*n89 + n172*n2*n93 + n173*n2*n87 + n176*n2*n90 + n179*n217*n76 + n181*n92 + n184*n88 + n185*n58 + n186*n59 + n187*n60 + n188*n25*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + n191*n223 + n193*n219 + n194*n225 + n195 - n247*n86 + n250*n75 + n255);
19955 NP_2a = -n57*(pow(alpha, n1*n24)*n0*n101*pow(n147, n18)*n215 + pow(alpha, n1*n24)*n0*n101*pow(n214, -n0)*n25*n61/n159 - 1.0*n112*n171 + n112*n188*n25*(-1 + (-n19 + xPj*xTj)/(n118*n122*n43)) + 1.0*xTj*(n0*n17*n183*n42*xF[0]*(pow(alpha, NP0*n1 + n121*n17)*n1*n111*n2/n118 + n2*n89) + n100*pow(n150, n18)*n40*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59) + n102*pow(n156, n18)*n40*xF[7]*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60) + n106*pow(n152, n18)*(-pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117 + n120*n137*n84) + n107*pow(n158, n18)*(-pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55 + n120*n136*n84) + n108*pow(n152, n18)*n40*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2) + n109*pow(n157, n18)*(pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115 + n120*n139*n84) + n11*pow(n154, n18)*n40*n51*xF[5]*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58) + n110*pow(n149, n18)*n22*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110) + n112*n171 + n113*n174 + n114*n175 + n115*n176 + n116*n172 + n117*n177 - pow(n149, n18)*n86*(-pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113 + n120*n140*n84) + pow(n151, n18)*n40*n97*xF[2]*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97) + pow(n151, n18)*n96*(pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n120*n142*n17*n27 + n27*n31*n80) + pow(n153, n18)*n40*n92*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92) + pow(n153, n18)*n77*xF[4]*(pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n120*n134*n84 + n27*n33*n50) + pow(n155, n18)*n40*n88*xF[6]*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88) + pow(n155, n18)*n94*(pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n120*n138*n17*n27 + n27*n35*n82) + pow(n157, n18)*n40*n90*xF[8]*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90) + pow(n158, n18)*n40*n87*xF[9]*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87) + n179*n40*n93*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93) + n179*n76*(-pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116 + n120*n144*n84) + n18*n190*n228 + n18*n251*n96 + n18*n252*n98 + n18*n256 + n185*n91 + n186*n99 + n187*n95 + n188*n245 + n191*(pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n120*n145*n84 + n51*n91) + n193*(pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n120*n141*n84 + n47*n99) + n194*(pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n120*n135*n84 + n53*n95) + n196 + n197 + n198 + n18*n239*n74*xF[9]/n170 + n18*n238*n73*xF[8]/n169 + n18*n237*n72*xF[7]/n168 + n18*n236*n94/n167 + n18*n233*n68*xF[3]/n164 + n18*n231*n66*xF[1]/n162 + n18*n230*n86/n161 + n18*n229*n62*xF[10]/n160));
19956 NP_sqrt_base = (-NP0*n290 - n21*(-n57*n61*xF[0]/(pow(alpha, n17*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1)) + n61 - 1) - n57*n62*xF[10]/(n62 - 1 + pow(alpha, -n5*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n66*xF[1]/(n66 - 1 + pow(alpha, -n7*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n68*xF[3]/(n68 - 1 + pow(alpha, -n9*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n69*xF[4]/(n69 - 1 + pow(alpha, -n10*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n72*xF[7]/(n72 - 1 + pow(alpha, -n13*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n73*xF[8]/(n73 - 1 + pow(alpha, -n14*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n74*xF[9]/(n74 - 1 + pow(alpha, -n15*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n86/(n65 - 1 + pow(alpha, -n6*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n94/(n71 - 1 + pow(alpha, -n12*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n96/(n67 - 1 + pow(alpha, -n8*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n98/(n70 - 1 + pow(alpha, -n11*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1)))) - n25*n57*n61/(-n143 + n61 - 1) - pow(NP0, -n0)*(1.0*n183*n240*n57*n89 - 0.5*n190*n216*n243*n57 + 0.5*n200 + 0.5*n271 - 0.5*n292*xTj))*(-n0*n200 - n0*n21*(n106*pow(n152, n18)*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n84*n9/n118 - pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117) + n106*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2)*(pow(alpha, NP0*n1 - n121*n9)*n111*n40*n9/n118 + n104*n40)/n164 + n107*pow(n158, n18)*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n84/n118 - pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55) + n107*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87)*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n40/n118 + n40*n87)/n170 + n109*pow(n157, n18)*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n84/n118 + pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115) + n109*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90)*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n40/n118 + n40*n90)/n169 - pow(n149, n18)*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n6*n84/n118 - pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113) + pow(n151, n18)*n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n17*n27*n8/n118 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n27*n31*n80) + pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n84/n118 + pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n27*n33*n50) + pow(n155, n18)*n57*n94*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n17*n27/n118 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n27*n35*n82) + n178*n57*n75*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88)*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n40/n118 + n40*n88) + n179*n57*n76*(pow(alpha, NP0*n1 - n121*n5)*n111*n5*n84/n118 - pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116) + n182*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110)*(pow(alpha, NP0*n1 - n121*n6)*n111*n40*n6/n118 + n40*n46*n6) + n188*n57*xF[0]*(pow(alpha, NP0*n1 - n1*n121)*n101*(-n19 + xPj*xTj)/(n118*n43) + n101*n78) + n189*n57*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59)*(pow(alpha, NP0*n1 - n121*n7)*n111*n40*n7/n118 + n100*n40) + n191*n57*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n84/n118 + pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n51*n91) + n192*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60)*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n40/n118 + n102*n40) + n193*n57*(pow(alpha, NP0*n1 - n121*n7)*n111*n7*n84/n118 + pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n47*n99) + n194*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n84/n118 + pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n53*n95) + n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 - n57*n98*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58)*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n40/n118 + n11*n40*n51)/n166 + n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92)*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n40/n118 + n40*n92)/n165 - n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97)*(pow(alpha, NP0*n1 - n121*n8)*n111*n40*n8/n118 + n40*n97)/n163 + n57*n76*xF[10]*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93)*(pow(alpha, NP0*n1 - n121*n5)*n111*n40*n5/n118 + n40*n93)/n160 + n25*n57*n61*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42)/n159) - n0*n271 + 4.0*n183*n240*n57*n89 - 4.0*n190*n228*n57) + pow(-n24*(1.0*n183*n57*n89*xF[0]*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + 0.5*n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) - 0.5*n190*n57*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42) + n212 - 0.5*xTj*(n106*pow(n152, n18)*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n84*n9/n118 - pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117) + n106*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2)*(pow(alpha, NP0*n1 - n121*n9)*n111*n40*n9/n118 + n104*n40)/n164 + n107*pow(n158, n18)*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n84/n118 - pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55) + n107*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87)*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n40/n118 + n40*n87)/n170 + n109*pow(n157, n18)*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n84/n118 + pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115) + n109*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90)*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n40/n118 + n40*n90)/n169 - pow(n149, n18)*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n6*n84/n118 - pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113) + pow(n151, n18)*n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n17*n27*n8/n118 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n27*n31*n80) + pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n84/n118 + pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n27*n33*n50) + pow(n155, n18)*n57*n94*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n17*n27/n118 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n27*n35*n82) + n178*n57*n75*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88)*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n40/n118 + n40*n88) + n179*n57*n76*(pow(alpha, NP0*n1 - n121*n5)*n111*n5*n84/n118 - pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116) + n182*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110)*(pow(alpha, NP0*n1 - n121*n6)*n111*n40*n6/n118 + n40*n46*n6) + n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) + n189*n57*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59)*(pow(alpha, NP0*n1 - n121*n7)*n111*n40*n7/n118 + n100*n40) + n191*n57*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n84/n118 + pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n51*n91) + n192*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60)*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n40/n118 + n102*n40) + n193*n57*(pow(alpha, NP0*n1 - n121*n7)*n111*n7*n84/n118 + pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n47*n99) + n194*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n84/n118 + pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n53*n95) + n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 - n57*n98*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58)*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n40/n118 + n11*n40*n51)/n166 + n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92)*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n40/n118 + n40*n92)/n165 - n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97)*(pow(alpha, NP0*n1 - n121*n8)*n111*n40*n8/n118 + n40*n97)/n163 + n57*n76*xF[10]*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93)*(pow(alpha, NP0*n1 - n121*n5)*n111*n40*n5/n118 + n40*n93)/n160 + n25*n57*n61*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42)/n159)) - n290, -n0);
19957 NP_sqrt_base = fabs(NP_sqrt_base);
19958 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
19959 NT1 = n85*(n119 - log(-pow(alpha, NP1*n1)*n111 + 1));
19960 g0 = MW[1] - Mstar;
19961 g1 = MW[0] - Mstar;
19964 g4 = MW[10] - Mstar;
19965 g5 = MW[11] - Mstar;
19966 g6 = MW[2] - Mstar;
19967 g7 = MW[3] - Mstar;
19968 g8 = MW[4] - Mstar;
19969 g9 = MW[5] - Mstar;
19970 g10 = MW[6] - Mstar;
19971 g11 = MW[7] - Mstar;
19972 g12 = MW[8] - Mstar;
19973 g13 = MW[9] - Mstar;
19979 g19 = pow(alpha, -g1);
19980 g20 = pow(alpha, -g4);
19981 g21 = pow(alpha, -g5);
19982 g22 = pow(alpha, -g0);
19983 g23 = pow(alpha, -g6);
19984 g24 = pow(alpha, -g7);
19985 g25 = pow(alpha, -g8);
19986 g26 = pow(alpha, -g9);
19987 g27 = pow(alpha, -g10);
19988 g28 = pow(alpha, -g11);
19989 g29 = pow(alpha, -g12);
19990 g30 = pow(alpha, -g13);
19991 g31 = log(xF[0]/xF[1]);
19993 g33 = pow(alpha, NP1*g0);
19994 g34 = pow(alpha, NP1*g1);
19995 g35 = pow(alpha, NP1*g4);
19997 g37 = pow(alpha, NP1*g5);
19998 g38 = pow(alpha, NP1*g6);
19999 g39 = pow(alpha, NP1*g7);
20000 g40 = pow(alpha, NP1*g8);
20001 g41 = pow(alpha, NP1*g9);
20002 g42 = pow(alpha, NP1*g10);
20003 g43 = pow(alpha, NP1*g11);
20004 g44 = pow(alpha, NP1*g12);
20005 g45 = pow(alpha, NP1*g13);
20035 g75 = g15/(g3*xF[1]);
20048 g88 = pow(alpha, g0*g32) - 1;
20049 g89 = pow(alpha, g0*g32) - 1;
20050 g90 = pow(alpha, g1*g32) - 1;
20051 g91 = pow(alpha, g32*g4) - 1;
20052 g92 = pow(alpha, g32*g5) - 1;
20053 g93 = pow(alpha, g32*g6) - 1;
20054 g94 = pow(alpha, g32*g7) - 1;
20055 g95 = pow(alpha, g32*g8) - 1;
20056 g96 = pow(alpha, g32*g9) - 1;
20057 g97 = pow(alpha, g10*g32) - 1;
20058 g98 = pow(alpha, g11*g32) - 1;
20059 g99 = pow(alpha, g12*g32) - 1;
20060 g100 = pow(alpha, g13*g32) - 1;
20061 g101 = -pow(alpha, g1*g32);
20062 g102 = -pow(alpha, g32*g4);
20063 g103 = -pow(alpha, g32*g5);
20064 g104 = -pow(alpha, g32*g6);
20065 g105 = -pow(alpha, g32*g7);
20066 g106 = -pow(alpha, g32*g8);
20067 g107 = -pow(alpha, g32*g9);
20068 g108 = -pow(alpha, g10*g32);
20069 g109 = -pow(alpha, g11*g32);
20070 g110 = -pow(alpha, g12*g32);
20071 g111 = -pow(alpha, g13*g32);
20073 g113 = -g101 - g34;
20074 g114 = -g102 - g35;
20075 g115 = -g103 - g37;
20076 g116 = -g104 - g38;
20077 g117 = -g105 - g39;
20078 g118 = -g106 - g40;
20079 g119 = -g107 - g41;
20080 g120 = -g108 - g42;
20081 g121 = -g109 - g43;
20082 g122 = -g110 - g44;
20083 g123 = -g111 - g45;
20084 g124 = pow(alpha, g1*g32) + g62;
20086 g126 = pow(alpha, g32*g4) + g63;
20087 g127 = pow(alpha, g32*g5) + g64;
20088 g128 = pow(alpha, g32*g6) + g65;
20089 g129 = pow(alpha, g32*g7) + g66;
20090 g130 = pow(alpha, g32*g8) + g67;
20091 g131 = pow(alpha, g32*g9) + g68;
20092 g132 = pow(alpha, g10*g32) + g69;
20093 g133 = pow(alpha, g11*g32) + g70;
20094 g134 = pow(alpha, g12*g32) + g71;
20095 g135 = pow(alpha, g13*g32) + g72;
20096 g136 = xF[11]/g127;
20101 g141 = xF[10]/g126;
20114 g154 = xF[11]/g115;
20118 g158 = xF[10]/g114;
20177 g217 = log(g125*g16*g75/g50);
20178 g218 = log(g112*g16*g75/g49);
20179 g219 = log(g125*g18*g47/g89);
20181 g221 = log(g112*g18*g47/g88);
20207 g247 = g76 + g77 + g78 + g79 + g80 + g81 + g82 + g83 + g84 + g85 + g86 + g87;
20208 LpF = xF[0]*(g19 + 1.0)*(g226 + g238 + g46)/(g36*(g19 - 1.0)) + xF[10]*(g20 + 1.0)*(g232 + g243 + g46)/(g36*(g20 - 1.0)) + xF[11]*(g21 + 1.0)*(g230 + g236 + g46)/(g36*(g21 - 1.0)) + xF[1]*(g22 + 1.0)*(g233 + g244 + g46)/(g36*(g22 - 1.0)) + xF[2]*(g23 + 1.0)*(g228 + g239 + g46)/(g36*(g23 - 1.0)) + xF[3]*(g24 + 1.0)*(g231 + g237 + g46)/(g36*(g24 - 1.0)) + xF[4]*(g25 + 1.0)*(g223 + g246 + g46)/(g36*(g25 - 1.0)) + xF[5]*(g26 + 1.0)*(g227 + g240 + g46)/(g36*(g26 - 1.0)) + xF[6]*(g27 + 1.0)*(g224 + g235 + g46)/(g36*(g27 - 1.0)) + xF[7]*(g28 + 1.0)*(g234 + g245 + g46)/(g36*(g28 - 1.0)) + xF[8]*(g29 + 1.0)*(g229 + g241 + g46)/(g36*(g29 - 1.0)) + xF[9]*(g30 + 1.0)*(g225 + g242 + g46)/(g36*(g30 - 1.0));
20211 SWUpF = -g136*g220*(g64 + 1) - g136*g222*(pow(alpha, g32*g5) - 1) - g137*g220*(g72 + 1) - g137*g222*(pow(alpha, g13*g32) - 1) - g138*g220*(g71 + 1) - g138*g222*(pow(alpha, g12*g32) - 1) - g139*g220*g50 - g139*g222*g89 - g140*g220*(g66 + 1) - g140*g222*(pow(alpha, g32*g7) - 1) - g141*g220*(g63 + 1) - g141*g222*(pow(alpha, g32*g4) - 1) - g142*g220*(g69 + 1) - g142*g222*(pow(alpha, g10*g32) - 1) - g143*g220*(g70 + 1) - g143*g222*(pow(alpha, g11*g32) - 1) - g144*g220*(g68 + 1) - g144*g222*(pow(alpha, g32*g9) - 1) - g145*g220*(g65 + 1) - g145*g222*(pow(alpha, g32*g6) - 1) - g146*g220*(g62 + 1) - g146*g222*(pow(alpha, g1*g32) - 1) - g247 - g17*g217*(g67 + 1)/g130 - g17*g219*(pow(alpha, g32*g8) - 1)/g130;
20212 SWUpP = -g48*(g100*g164*g221 + g159*g218*g51 + g159*g221*g90 + g160*g218*g58 + g160*g221*g97 + g161*g218*g54 + g161*g221*g93 + g162*g218*g53 + g162*g221*g92 + g163*g218*g57 + g163*g221*g96 + g164*g218*g61 + g165*g218*g60 + g165*g221*g99 + g166*g218*g52 + g166*g221*g91 + g167*g218*g55 + g167*g221*g94 + g168*g218*g49 + g168*g221*g88 + g169*g218*g59 + g169*g221*g98 + g17*g223 + g17*g246 + g247);
20217 xP[4] = g147*g48*g95;
20239 n0 = -0.500000000000000;
20240 n1 = -2.00000000000000;
20241 n2 = MW[0] - Mstar;
20245 n6 = MW[10] - Mstar;
20246 n7 = MW[11] - Mstar;
20247 n8 = MW[12] - Mstar;
20248 n9 = MW[1] - Mstar;
20249 n10 = MW[2] - Mstar;
20250 n11 = MW[3] - Mstar;
20251 n12 = MW[4] - Mstar;
20252 n13 = MW[5] - Mstar;
20253 n14 = MW[6] - Mstar;
20254 n15 = MW[7] - Mstar;
20255 n16 = MW[8] - Mstar;
20256 n17 = MW[9] - Mstar;
20265 n26 = pow(n2, -n1);
20266 n27 = pow(n3, -n1);
20267 n28 = pow(n6, -n1);
20268 n29 = pow(n7, -n1);
20269 n30 = pow(n8, -n1);
20270 n31 = pow(n9, -n1);
20271 n32 = pow(n10, -n1);
20272 n33 = pow(n11, -n1);
20273 n34 = pow(n12, -n1);
20274 n35 = pow(n13, -n1);
20275 n36 = pow(n14, -n1);
20276 n37 = pow(n15, -n1);
20277 n38 = pow(n16, -n1);
20278 n39 = pow(n17, -n1);
20281 n42 = pow(alpha, NP0*n2);
20282 n43 = n21 + n24*xF[0];
20283 n44 = n21 + n24*xPj;
20284 n45 = pow(alpha, NP0*n6);
20285 n46 = pow(alpha, NP0*n7);
20286 n47 = pow(alpha, NP0*n8);
20287 n48 = pow(alpha, NP0*n9);
20288 n49 = pow(alpha, NP0*n10);
20289 n50 = pow(alpha, NP0*n11);
20290 n51 = pow(alpha, NP0*n12);
20291 n52 = pow(alpha, NP0*n13);
20292 n53 = pow(alpha, NP0*n14);
20293 n54 = pow(alpha, NP0*n15);
20294 n55 = pow(alpha, NP0*n16);
20295 n56 = pow(alpha, NP0*n17);
20305 n66 = pow(alpha, NP0*n1*n19);
20306 n67 = pow(n44, -n1);
20351 n112 = log((-1.0 + xPj/xF[0])/n4);
20352 n113 = -n69*xF[12];
20354 n115 = n106*xF[10];
20355 n116 = -n65*xF[10];
20360 n121 = n109*n3*xF[12];
20361 n122 = n27*n29*n46;
20362 n123 = n27*n32*n49;
20363 n124 = n27*n38*n55;
20364 n125 = n27*n34*n51;
20365 n126 = n27*n28*n45;
20366 n127 = n27*n36*n53;
20367 n128 = n27*n33*n50;
20368 n129 = n120*n82 + 1;
20369 n130 = n112 + n18 + n40 + n57;
20372 n133 = n131*n3*n42;
20373 n134 = n90*(n130 - log(n129)) + 1;
20374 n135 = pow(alpha, n134*n2);
20375 n136 = pow(alpha, n134*n6);
20376 n137 = pow(alpha, n134*n7);
20377 n138 = pow(alpha, n134*n8);
20378 n139 = pow(alpha, n134*n9);
20379 n140 = pow(alpha, n10*n134);
20380 n141 = pow(alpha, n11*n134);
20381 n142 = pow(alpha, n12*n134);
20382 n143 = pow(alpha, n13*n134);
20383 n144 = pow(alpha, n134*n14);
20384 n145 = pow(alpha, n134*n15);
20385 n146 = pow(alpha, n134*n16);
20386 n147 = pow(alpha, n134*n17);
20401 n162 = pow(alpha, n134*n19) + n64 - 1;
20402 n163 = n65 - 1 + 1.0/n136;
20403 n164 = n68 - 1 + 1.0/n137;
20404 n165 = n69 - 1 + 1.0/n138;
20405 n166 = n70 - 1 + 1.0/n139;
20406 n167 = n71 - 1 + 1.0/n140;
20407 n168 = n72 - 1 + 1.0/n141;
20408 n169 = n73 - 1 + 1.0/n142;
20409 n170 = n74 - 1 + 1.0/n143;
20410 n171 = n75 - 1 + 1.0/n144;
20411 n172 = n76 - 1 + 1.0/n145;
20412 n173 = n77 - 1 + 1.0/n146;
20413 n174 = n78 - 1 + 1.0/n147;
20414 n175 = pow(n162, 3);
20415 n176 = pow(n163, 3);
20416 n177 = pow(n164, 3);
20417 n178 = pow(n165, 3);
20418 n179 = pow(n166, 3);
20419 n180 = pow(n167, 3);
20420 n181 = pow(n168, 3);
20421 n182 = pow(n169, 3);
20422 n183 = pow(n170, 3);
20423 n184 = pow(n171, 3);
20424 n185 = pow(n172, 3);
20425 n186 = pow(n173, 3);
20426 n187 = pow(n174, 3);
20428 n189 = xF[11]/n164;
20433 n194 = xF[10]/n163;
20434 n195 = pow(n168, n20)*xF[3];
20439 n200 = n3*xF[9]/n174;
20440 n201 = n52*xF[5]/n170;
20441 n202 = n48*xF[1]/n166;
20442 n203 = n54*xF[7]/n172;
20443 n204 = n47*xF[12]/n165;
20445 n206 = pow(n162, n20)*n64;
20446 n207 = -n108*pow(n170, n20);
20448 n209 = -pow(n166, n20)*n70*xF[1];
20449 n210 = n111*n56*xF[9]/n174;
20450 n211 = n58*n89/(n162*n90);
20451 n212 = n19*n3*n58*n89/n162;
20452 n213 = n58*n89*n97/n162;
20453 n214 = n126*n194*n58;
20454 n215 = n122*n189*n58;
20455 n216 = n104*n204*n58;
20456 n217 = n105*n202*n58;
20457 n218 = n123*n188*n58;
20458 n219 = n128*n191*n58;
20459 n220 = n125*n190*n58;
20460 n221 = n201*n58*n95;
20461 n222 = n127*n193*n58;
20462 n223 = n203*n58*n99;
20463 n224 = n124*n192*n58;
20465 n226 = n0*n58*n82*n97*xF[0]/n162;
20466 n227 = n131/n135 + 1;
20467 n228 = n131*n42/(n135*n90) + n42/n90;
20468 n229 = n106*n3 + n133*n157;
20469 n230 = n119 + n133*n154;
20470 n231 = n109*n3 + n133*n148;
20471 n232 = n131*n42*n60/n139 + n48*n60;
20472 n233 = n100*n3 + n133*n156;
20473 n234 = n133*n151 + n3*n92;
20474 n235 = n12*n96 + n133*n158;
20475 n236 = n131*n161*n59 + n52*n59;
20476 n237 = n133*n152 + n3*n93;
20477 n238 = n131*n42*n63/n145 + n54*n63;
20478 n239 = n133*n153 + n3*n94;
20479 n240 = n103*n3 + n133*n150;
20480 n241 = pow(n228, -n1);
20481 n242 = pow(n229, -n1);
20482 n243 = pow(n230, -n1);
20483 n244 = pow(n231, -n1);
20484 n245 = pow(n232, -n1);
20485 n246 = pow(n233, -n1);
20486 n247 = pow(n234, -n1);
20487 n248 = pow(n235, -n1);
20488 n249 = pow(n236, -n1);
20489 n250 = pow(n237, -n1);
20490 n251 = pow(n238, -n1);
20491 n252 = pow(n239, -n1);
20492 n253 = pow(n240, -n1);
20494 n255 = n1*n133*n19/n135 + n1*n19*n3*n42;
20496 n257 = n131*n82*n97/n135 + n82*n97;
20497 n258 = pow(n165, n20)*n231;
20498 n259 = pow(n162, n20)*n228;
20499 n260 = pow(n164, n20)*n230;
20500 n261 = pow(n174, n20)*n240;
20501 n262 = pow(n163, n20)*n229;
20502 n263 = pow(n172, n20)*n238;
20503 n264 = pow(n173, n20)*n239;
20504 n265 = pow(n171, n20)*n237*xF[6];
20507 n268 = pow(n169, n20)*n235*xF[4];
20510 n271 = pow(n162, n20)*n257;
20511 n272 = -n102*n259*n58;
20512 n273 = n1*pow(n162, n20)*n19*n3*n58*n89*(pow(alpha, NP0*n2 + n134*n19)*n131/n90 + n42/n90);
20513 n274 = n115*pow(n163, n20)*n41*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3);
20514 n275 = n119*pow(n164, n20)*n23*n58*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119);
20515 n276 = n109*pow(n165, n20)*n41*n58*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3);
20516 n277 = n107*pow(n166, n20)*n41*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60);
20517 n278 = n100*pow(n167, n20)*n41*n58*xF[2]*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3);
20518 n279 = n195*n41*n58*n92*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92);
20519 n280 = n12*pow(n169, n20)*n41*n51*n58*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96);
20520 n281 = n13*pow(n170, n20)*n41*n52*n58*xF[5]*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59);
20521 n282 = pow(n171, n20)*n41*n58*n93*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93);
20522 n283 = n110*pow(n172, n20)*n41*n58*xF[7]*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63);
20523 n284 = pow(n173, n20)*n41*n58*n94*xF[8]*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94);
20524 n285 = n103*pow(n174, n20)*n41*n58*xF[9]*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3);
20525 n286 = 1.0*n259*n58*n89/n90;
20526 n287 = n102*n271*n58;
20528 n289 = n211 + n272;
20529 n290 = n228*n255/n175;
20530 n291 = pow(alpha, n2*n25)*pow(n129, n20)*n157*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67/n136 + n126 + n132*n157*n98;
20531 n292 = pow(alpha, n2*n25)*pow(n129, n20)*n154*n19*n27*pow(n43, n20)*n67 + pow(alpha, n2*n25)*pow(n129, n20)*n160*n27*pow(n43, n20)*n67 + n132*n154*n19*n42 + n27*n29*n83;
20532 n293 = pow(alpha, n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67/n138 + pow(alpha, n2*n25)*pow(n129, n20)*n148*n19*n27*pow(n43, n20)*n67 + n104*n84 + n132*n148*n19*n42;
20533 n294 = pow(alpha, n2*n25)*pow(n129, n20)*n156*n19*n27*pow(n43, n20)*n67 + pow(alpha, n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67/n140 + n132*n156*n19*n42 + n27*n32*n85;
20534 n295 = pow(alpha, n2*n25)*pow(n129, n20)*n158*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67/n142 + n125 + n132*n158*n98;
20535 n296 = pow(alpha, n2*n25)*pow(n129, n20)*n152*n19*n27*pow(n43, n20)*n67 + pow(alpha, n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67/n144 + n132*n152*n19*n42 + n27*n36*n87;
20536 n297 = pow(alpha, n2*n25)*pow(n129, n20)*n149*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99/n145 + n132*n149*n98 + n54*n99;
20537 n298 = pow(alpha, n2*n25)*pow(n129, n20)*n153*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67/n146 + n124 + n132*n153*n98;
20538 n299 = pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84 + n132*n148*n19*n42);
20539 n300 = n101*pow(n167, n20)*n58*(pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n132*n156*n19*n42 + n27*n32*n85);
20540 n301 = pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n132*n152*n19*n42 + n27*n36*n87);
20541 n302 = n116*pow(n163, n20)*n58*(pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126 + n132*n157*n98);
20542 n303 = n209*n58*(-pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48 + n132*n155*n98);
20543 n304 = pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125 + n132*n158*n98);
20544 n305 = n207*n58*(pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n132*n159*n98 + n52*n95);
20545 n306 = n118*pow(n172, n20)*n58*(pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n132*n149*n98 + n54*n99);
20546 n307 = n117*pow(n173, n20)*n58*(pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124 + n132*n153*n98);
20547 n308 = n114*pow(n174, n20)*n58*(-pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56 + n132*n150*n98);
20548 n309 = n226 + n286 + n288;
20549 n310 = n100*n188*n3*n58 - n101*pow(n167, n20)*n233*n58 + n103*n200*n58 + n113*n258*n58 + n114*n261*n58 + n115*n197*n58 + n116*n262*n58 + n117*n264*n58 + n118*n263*n58 + n119*n189*n58 + n12*n190*n58*n96 + n121*n58/n165 + n191*n3*n58*n92 + n192*n3*n58*n94 + n193*n3*n58*n93 + n195*n234*n58*n79 + n201*n58*n59 + n202*n58*n60 + n203*n58*n63 + n207*n236*n58 + n209*n232*n58 - n260*n58*n91 + n265*n58*n80 + n268*n58*n81 + n289;
20551 n312 = n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n287 + n299 + n300 + n301 + n302 + n303 + n304 + n305 + n306 + n307 + n308;
20552 n313 = -n101*n233*n58*(n100*n41 + n131*n156*n41*n42)/n180 - n102*n290*n58 - n108*n236*n58*(n13*n41*n52 + n131*n159*n41*n42)/n183 + n113*n231*n58*(n109*n41 + n131*n148*n41*n42)/n178 + n114*n240*n58*(n103*n41 + n131*n150*n41*n42)/n187 + n116*n229*n58*(n106*n41 + n131*n157*n41*n42)/n176 + n117*n239*n58*(n131*n153*n41*n42 + n41*n94)/n186 - pow(n164, n20)*n58*n91*(pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122 + n132*n154*n98) + n195*n58*n72*(pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n132*n151*n19*n42 + n27*n50*n61) + n196*n237*n58*n80*(n131*n152*n41*n42 + n41*n93) + n199*n235*n58*n81*(n12*n41*n51 + n131*n158*n41*n42) - n205*n254*n58*(n107*n41 + n131*n155*n41*n42) + n208*n238*n58*(n110*n41 + n131*n149*n41*n42) + n312 + n234*n58*n79*xF[3]*(n131*n151*n41*n42 + n41*n92)/n181 - n230*n58*n91*(n131*n154*n41*n42 + n41*n46*n7)/n177;
20554 NP_b = -n206*n227*n58*n89/n90 - n212 - n25*(-n0*n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) + n0*xTj*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) + n101*n20*n267*n58 + n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) + n102*n20*n266*n58 + n108*n20*n269*n58 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) + pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n19*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n27*n29*n83) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n79*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n2 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*pow(n43, n20)*n61*n67 + n128) + n196*n20*n250*n58*n75 + n199*n20*n248*n58*n73 + n20*n205*n256*n58 + n20*n270*n58*n91 + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n20*n253*n58*n78*xF[9]/n187 + n20*n252*n58*n77*xF[8]/n186 + n20*n251*n58*n76*xF[7]/n185 + n20*n247*n58*n72*xF[3]/n181 + n20*n244*n58*n69*xF[12]/n178 + n20*n242*n58*n65*xF[10]/n176) - 1.0*n102*n266*n58 + 1.0*pow(n162, n20)*n58*n89*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)/n90 + n226) - n58*xTj*(n100*n188*n3 - n101*pow(n167, n20)*n233 - n102*n259 + n103*n200 + n113*n258 + n114*n261 + n115*n197 + n116*n262 + n117*n264 + n118*n263 + n119*n189 + n12*n190*n96 + n121/n165 + n191*n3*n92 + n192*n3*n94 + n193*n3*n93 + n195*n234*n79 + n201*n59 + n202*n60 + n203*n63 + n207*n236 + n209*n232 - n260*n91 + n265*n80 + n268*n81 + n89/(n162*n90));
20555 NP_2a = -n58*(-pow(alpha, n2*n25)*n1*n102*pow(n227, -n1)*n97/n175 + pow(alpha, n2*n25)*n1*pow(n162, n20)*n227*n97*xF[0] + n102*pow(n162, n20)*n82*n97*(-1 + (-n21 + xPj*xTj)/(n129*n135*n43)) + 1.0*xTj*(n1*pow(n162, n20)*n19*n3*n89*(pow(alpha, NP0*n2 + n134*n19)*n131/n90 + n42/n90) + n100*pow(n167, n20)*n41*xF[2]*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3) + n101*pow(n167, n20)*(pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n132*n156*n19*n42 + n27*n32*n85) + n101*n20*n267 + n102*n20*n266 + n102*n271 + n103*pow(n174, n20)*n41*xF[9]*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3) + n104*n204 + n105*n202 + n107*pow(n166, n20)*n41*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60) + n108*n20*n269 + n109*pow(n165, n20)*n41*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3) + n110*pow(n172, n20)*n41*xF[7]*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63) + n115*pow(n163, n20)*n41*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3) + n116*pow(n163, n20)*(pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126 + n132*n157*n98) + n117*pow(n173, n20)*(pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124 + n132*n153*n98) + n118*pow(n172, n20)*(pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n132*n149*n98 + n54*n99) + n119*pow(n164, n20)*n23*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119) + n12*pow(n169, n20)*n41*n51*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96) + n122*n189 + n123*n188 + n124*n192 + n125*n190 + n126*n194 + n127*n193 + n128*n191 + n13*pow(n170, n20)*n41*n52*xF[5]*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59) + pow(n164, n20)*n91*(pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n132*n154*n19*n42 + n27*n29*n83) + pow(n165, n20)*n69*xF[12]*(pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84 + n132*n148*n19*n42) + pow(n169, n20)*n81*xF[4]*(pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125 + n132*n158*n98) + pow(n171, n20)*n41*n93*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93) + pow(n171, n20)*n75*xF[6]*(pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n132*n152*n19*n42 + n27*n36*n87) + pow(n173, n20)*n41*n94*xF[8]*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94) + pow(n174, n20)*n78*xF[9]*(pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n19*n27*pow(n43, n20)*n67 + n111*n88 + n132*n150*n19*n42) + n195*n41*n92*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92) + n195*n79*(pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*pow(n43, n20)*n61*n67 + n128 + n132*n151*n98) + n196*n20*n250*n75 + n199*n20*n248*n73 + n20*n205*n256 + n20*n270*n91 + n201*n95 + n203*n99 + n207*(pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n132*n159*n98 + n52*n95) + n209*(-pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48 + n132*n155*n98) + n210 + n20*n253*n78*xF[9]/n187 + n20*n252*n77*xF[8]/n186 + n20*n251*n76*xF[7]/n185 + n20*n247*n72*xF[3]/n181 + n20*n244*n69*xF[12]/n178 + n20*n242*n65*xF[10]/n176 + n89*n97/n162) - 1.0*n89*n97/n162);
20556 NP_sqrt_base = (NP0*(n24*(n100*n188*n3*n58 - n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3) - n102*pow(n162, n20)*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90) + n103*n200*n58 + n113*pow(n165, n20)*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3) + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3) + n115*n197*n58 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3) + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94) + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63) + n119*n189*n58 + n12*n190*n58*n96 + n121*n58/n165 - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96) + pow(n171, n20)*n58*n80*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93) + n191*n3*n58*n92 + n192*n3*n58*n94 + n193*n3*n58*n93 + n195*n58*n79*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92) + n201*n58*n59 + n202*n58*n60 + n203*n58*n63 + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60) + n211) + n289) + n102*n58/n162 + xTj*(-n101*n58/n167 + n102*n198*n58 - n108*n58/n170 + n113*n58/n165 + n114*n58/n174 + n116*n58/n163 + n117*n58/n173 + n118*n58/n172 + n190*n58*n81 + n191*n58*n79 + n193*n58*n80 - n58*n70*xF[1]/n166 - n58*n91/n164) + pow(NP0, -n1)*(-n0*n102*n290*n58 + n0*n213 + n0*n24*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) - n101*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3)*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n41 + n100*n41)/n180 + n102*pow(n162, n20)*n58*(pow(alpha, NP0*n2 - n134*n2)*n97*(-n21 + xPj*xTj)/(n129*n43) + n82*n97) - n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 - n108*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59)*(pow(alpha, NP0*n2 - n13*n134)*n13*n131*n41 + n13*n41*n52)/n183 + n113*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3)*(pow(alpha, NP0*n2 - n134*n8)*n131*n41*n8 + n109*n41)/n178 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n114*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3)*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n41 + n103*n41)/n187 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n116*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3)*(pow(alpha, NP0*n2 - n134*n6)*n131*n41*n6 + n106*n41)/n176 + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n117*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94)*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n41 + n41*n94)/n186 + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n2*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n72*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n19 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n27*n50*n61) + n196*n58*n80*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93)*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n41 + n41*n93) + n199*n58*n81*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96)*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n41 + n12*n41*n51) - n205*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60)*(pow(alpha, NP0*n2 - n134*n9)*n131*n41*n9 + n107*n41) + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n208*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63)*(pow(alpha, NP0*n2 - n134*n15)*n131*n15*n41 + n110*n41) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n58*n79*xF[3]*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92)*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n41 + n41*n92)/n181 - n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119)*(pow(alpha, NP0*n2 - n134*n7)*n131*n41*n7 + n41*n46*n7)/n177) + n0*n287 - 1.0*n259*n58*n89/n90))*(-n1*n213 - n1*n24*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) - n101*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3)*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n41 + n100*n41)/n180 + n102*pow(n162, n20)*n58*(pow(alpha, NP0*n2 - n134*n2)*n97*(-n21 + xPj*xTj)/(n129*n43) + n82*n97) - n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 - n108*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59)*(pow(alpha, NP0*n2 - n13*n134)*n13*n131*n41 + n13*n41*n52)/n183 + n113*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3)*(pow(alpha, NP0*n2 - n134*n8)*n131*n41*n8 + n109*n41)/n178 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n114*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3)*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n41 + n103*n41)/n187 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n116*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3)*(pow(alpha, NP0*n2 - n134*n6)*n131*n41*n6 + n106*n41)/n176 + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n117*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94)*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n41 + n41*n94)/n186 + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n2*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n72*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n19 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n27*n50*n61) + n196*n58*n80*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93)*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n41 + n41*n93) + n199*n58*n81*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96)*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n41 + n12*n41*n51) - n205*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60)*(pow(alpha, NP0*n2 - n134*n9)*n131*n41*n9 + n107*n41) + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n208*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63)*(pow(alpha, NP0*n2 - n134*n15)*n131*n15*n41 + n110*n41) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n58*n79*xF[3]*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92)*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n41 + n41*n92)/n181 - n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119)*(pow(alpha, NP0*n2 - n134*n7)*n131*n41*n7 + n41*n46*n7)/n177) - n1*n287 - 4.0*n102*n266*n58 + 4.0*n259*n58*n89/n90) + pow(-n102*n259*n58 - n212 - n25*(-n0*n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) + n0*n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 + n0*xTj*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) - n101*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3)*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n41 + n100*n41)/n180 + n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) - n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 - n108*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59)*(pow(alpha, NP0*n2 - n13*n134)*n13*n131*n41 + n13*n41*n52)/n183 + n113*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3)*(pow(alpha, NP0*n2 - n134*n8)*n131*n41*n8 + n109*n41)/n178 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n114*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3)*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n41 + n103*n41)/n187 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n116*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3)*(pow(alpha, NP0*n2 - n134*n6)*n131*n41*n6 + n106*n41)/n176 + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n117*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94)*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n41 + n41*n94)/n186 + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n2*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n72*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n19 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n27*n50*n61) + n196*n58*n80*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93)*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n41 + n41*n93) + n199*n58*n81*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96)*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n41 + n12*n41*n51) - n205*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60)*(pow(alpha, NP0*n2 - n134*n9)*n131*n41*n9 + n107*n41) + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n208*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63)*(pow(alpha, NP0*n2 - n134*n15)*n131*n15*n41 + n110*n41) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n58*n79*xF[3]*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92)*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n41 + n41*n92)/n181 - n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119)*(pow(alpha, NP0*n2 - n134*n7)*n131*n41*n7 + n41*n46*n7)/n177) + 1.0*pow(n162, n20)*n58*n89*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)/n90 + n226) - n311, -n1);
20557 NP_sqrt_base = fabs(NP_sqrt_base);
20558 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
20559 NT1 = n90*(n130 - log(-pow(alpha, NP1*n2)*n120 + 1));
20560 g0 = MW[1] - Mstar;
20561 g1 = MW[0] - Mstar;
20564 g4 = MW[10] - Mstar;
20565 g5 = MW[11] - Mstar;
20566 g6 = MW[12] - Mstar;
20567 g7 = MW[2] - Mstar;
20568 g8 = MW[3] - Mstar;
20569 g9 = MW[4] - Mstar;
20570 g10 = MW[5] - Mstar;
20571 g11 = MW[6] - Mstar;
20572 g12 = MW[7] - Mstar;
20573 g13 = MW[8] - Mstar;
20574 g14 = MW[9] - Mstar;
20579 g19 = pow(alpha, -g1);
20580 g20 = pow(alpha, -g4);
20581 g21 = pow(alpha, -g5);
20582 g22 = pow(alpha, -g6);
20583 g23 = pow(alpha, -g0);
20584 g24 = pow(alpha, -g7);
20585 g25 = pow(alpha, -g8);
20586 g26 = pow(alpha, -g9);
20587 g27 = pow(alpha, -g10);
20588 g28 = pow(alpha, -g11);
20589 g29 = pow(alpha, -g12);
20590 g30 = pow(alpha, -g13);
20591 g31 = pow(alpha, -g14);
20592 g32 = log(xF[0]/xF[1]);
20594 g34 = pow(alpha, NP1*g0);
20595 g35 = pow(alpha, NP1*g1);
20596 g36 = pow(alpha, NP1*g4);
20598 g38 = pow(alpha, NP1*g5);
20599 g39 = pow(alpha, NP1*g6);
20600 g40 = pow(alpha, NP1*g7);
20601 g41 = pow(alpha, NP1*g8);
20602 g42 = pow(alpha, NP1*g9);
20603 g43 = pow(alpha, NP1*g10);
20604 g44 = pow(alpha, NP1*g11);
20605 g45 = pow(alpha, NP1*g12);
20606 g46 = pow(alpha, NP1*g13);
20607 g47 = pow(alpha, NP1*g14);
20639 g79 = g16/(g3*xF[1]);
20640 g80 = pow(alpha, g0*g33) - 1;
20641 g81 = pow(alpha, g0*g33) - 1;
20642 g82 = pow(alpha, g1*g33) - 1;
20643 g83 = pow(alpha, g33*g7) - 1;
20644 g84 = pow(alpha, g33*g8) - 1;
20645 g85 = pow(alpha, g33*g9) - 1;
20646 g86 = pow(alpha, g10*g33) - 1;
20647 g87 = pow(alpha, g11*g33) - 1;
20648 g88 = pow(alpha, g12*g33) - 1;
20649 g89 = pow(alpha, g13*g33) - 1;
20650 g90 = pow(alpha, g14*g33) - 1;
20651 g91 = pow(alpha, g33*g4) - 1;
20652 g92 = pow(alpha, g33*g5) - 1;
20653 g93 = pow(alpha, g33*g6) - 1;
20654 g94 = -pow(alpha, g1*g33);
20655 g95 = -pow(alpha, g33*g4);
20656 g96 = -pow(alpha, g33*g5);
20657 g97 = -pow(alpha, g33*g6);
20658 g98 = -pow(alpha, g33*g7);
20659 g99 = -pow(alpha, g33*g8);
20660 g100 = -pow(alpha, g33*g9);
20661 g101 = -pow(alpha, g10*g33);
20662 g102 = -pow(alpha, g11*g33);
20663 g103 = -pow(alpha, g12*g33);
20664 g104 = -pow(alpha, g13*g33);
20665 g105 = -pow(alpha, g14*g33);
20673 g113 = -g100 - g42;
20674 g114 = -g101 - g43;
20675 g115 = -g102 - g44;
20676 g116 = -g103 - g45;
20677 g117 = -g104 - g46;
20678 g118 = -g105 - g47;
20679 g119 = pow(alpha, g1*g33) + g65;
20681 g121 = pow(alpha, g33*g4) + g66;
20682 g122 = pow(alpha, g33*g5) + g67;
20683 g123 = pow(alpha, g33*g6) + g68;
20684 g124 = pow(alpha, g33*g7) + g69;
20685 g125 = pow(alpha, g33*g8) + g70;
20686 g126 = pow(alpha, g33*g9) + g71;
20687 g127 = pow(alpha, g10*g33) + g72;
20688 g128 = pow(alpha, g11*g33) + g73;
20689 g129 = pow(alpha, g12*g33) + g74;
20690 g130 = pow(alpha, g13*g33) + g75;
20691 g131 = pow(alpha, g14*g33) + g76;
20692 g132 = xF[11]/g122;
20696 g136 = xF[10]/g121;
20700 g140 = xF[12]/g123;
20710 g150 = xF[11]/g109;
20714 g154 = xF[12]/g110;
20715 g155 = xF[10]/g108;
20744 g184 = log(g120*g17*g79/g52);
20745 g185 = log(g106*g17*g79/g51);
20746 g186 = log(g120*g18*g49/g81);
20748 g188 = log(g106*g18*g49/g80);
20750 g190 = -g132*g187*(g67 + 1) - g132*g189*(pow(alpha, g33*g5) - 1) - g133*g187*(g76 + 1) - g133*g189*(pow(alpha, g14*g33) - 1) - g134*g187*(g75 + 1) - g134*g189*(pow(alpha, g13*g33) - 1) - g135*g187*g52 - g135*g189*g81 - g136*g187*(g66 + 1) - g136*g189*(pow(alpha, g33*g4) - 1) - g137*g187*(g70 + 1) - g137*g189*(pow(alpha, g33*g8) - 1) - g138*g187*(g74 + 1) - g138*g189*(pow(alpha, g12*g33) - 1) - g139*g187*(g71 + 1) - g139*g189*(pow(alpha, g33*g9) - 1) - g140*g187*(g68 + 1) - g140*g189*(pow(alpha, g33*g6) - 1) - g141*g187*(g73 + 1) - g141*g189*(pow(alpha, g11*g33) - 1) - g142*g187*(g72 + 1) - g142*g189*(pow(alpha, g10*g33) - 1) - g143*g187*(g69 + 1) - g143*g189*(pow(alpha, g33*g7) - 1) - g144*g187*(g65 + 1) - g144*g189*(pow(alpha, g1*g33) - 1) - g77*xF[0] - g77*xF[10] - g77*xF[11] - g77*xF[12] - g77*xF[1] - g77*xF[2] - g77*xF[3] - g77*xF[4] - g77*xF[5] - g77*xF[6] - g77*xF[7] - g77*xF[8] - g77*xF[9];
20751 LpF = xF[0]*(g19 + 1.0)*(g162*g185 + g172*g188 + g48)/(g37*(g19 - 1.0)) + xF[10]*(g20 + 1.0)*(g169*g185 + g182*g188 + g48)/(g37*(g20 - 1.0)) + xF[11]*(g21 + 1.0)*(g167*g185 + g173*g188 + g48)/(g37*(g21 - 1.0)) + xF[12]*(g22 + 1.0)*(g164*g185 + g180*g188 + g48)/(g37*(g22 - 1.0)) + xF[1]*(g23 + 1.0)*(g166*g185 + g171*g188 + g48)/(g37*(g23 - 1.0)) + xF[2]*(g24 + 1.0)*(g168*g185 + g174*g188 + g48)/(g37*(g24 - 1.0)) + xF[3]*(g25 + 1.0)*(g165*g185 + g175*g188 + g48)/(g37*(g25 - 1.0)) + xF[4]*(g26 + 1.0)*(g160*g185 + g176*g188 + g48)/(g37*(g26 - 1.0)) + xF[5]*(g27 + 1.0)*(g163*g185 + g183*g188 + g48)/(g37*(g27 - 1.0)) + xF[6]*(g28 + 1.0)*(g158*g185 + g179*g188 + g48)/(g37*(g28 - 1.0)) + xF[7]*(g29 + 1.0)*(g161*g185 + g181*g188 + g48)/(g37*(g29 - 1.0)) + xF[8]*(g30 + 1.0)*(g170*g185 + g177*g188 + g48)/(g37*(g30 - 1.0)) + xF[9]*(g31 + 1.0)*(g159*g185 + g178*g188 + g48)/(g37*(g31 - 1.0));
20756 xP[0] = g146*g50*g82;
20757 xP[1] = g145*g50*g80;
20758 xP[2] = g149*g50*g83;
20759 xP[3] = g151*g50*g84;
20760 xP[4] = g147*g50*g85;
20761 xP[5] = g157*g50*g86;
20762 xP[6] = g152*g50*g87;
20763 xP[7] = g148*g50*g88;
20764 xP[8] = g153*g50*g89;
20765 xP[9] = g156*g50*g90;
20766 xP[10] = g155*g50*g91;
20767 xP[11] = g150*g50*g92;
20768 xP[12] = g154*g50*g93;
20769 xT[0] = g146*g53*g78;
20770 xT[1] = g145*g51*g78;
20771 xT[2] = g149*g54*g78;
20772 xT[3] = g151*g55*g78;
20773 xT[4] = g147*g56*g78;
20774 xT[5] = g157*g57*g78;
20775 xT[6] = g152*g58*g78;
20776 xT[7] = g148*g59*g78;
20777 xT[8] = g153*g60*g78;
20778 xT[9] = g156*g61*g78;
20779 xT[10] = g155*g62*g78;
20780 xT[11] = g150*g63*g78;
20781 xT[12] = g154*g64*g78;
20784 n0 = -0.500000000000000;
20785 n1 = MW[0] - Mstar;
20789 n5 = MW[10] - Mstar;
20790 n6 = MW[11] - Mstar;
20791 n7 = MW[12] - Mstar;
20792 n8 = MW[13] - Mstar;
20793 n9 = MW[1] - Mstar;
20794 n10 = MW[2] - Mstar;
20795 n11 = MW[3] - Mstar;
20796 n12 = MW[4] - Mstar;
20797 n13 = MW[5] - Mstar;
20798 n14 = MW[6] - Mstar;
20799 n15 = MW[7] - Mstar;
20800 n16 = MW[8] - Mstar;
20801 n17 = MW[9] - Mstar;
20811 n27 = pow(n1, -n20);
20812 n28 = pow(n2, -n20);
20813 n29 = pow(n5, -n20);
20814 n30 = pow(n6, -n20);
20815 n31 = pow(n7, -n20);
20816 n32 = pow(n8, -n20);
20817 n33 = pow(n9, -n20);
20818 n34 = pow(n10, -n20);
20819 n35 = pow(n11, -n20);
20820 n36 = pow(n12, -n20);
20821 n37 = pow(n13, -n20);
20822 n38 = pow(n14, -n20);
20823 n39 = pow(n15, -n20);
20824 n40 = pow(n16, -n20);
20825 n41 = pow(n17, -n20);
20828 n44 = pow(alpha, NP0*n1);
20829 n45 = n21 + n23*xF[0];
20830 n46 = n21 + n23*xPj;
20831 n47 = pow(alpha, NP0*n5);
20832 n48 = pow(alpha, NP0*n6);
20833 n49 = pow(alpha, NP0*n7);
20834 n50 = pow(alpha, NP0*n8);
20835 n51 = pow(alpha, NP0*n9);
20836 n52 = pow(alpha, NP0*n10);
20837 n53 = pow(alpha, NP0*n11);
20838 n54 = pow(alpha, NP0*n12);
20839 n55 = pow(alpha, NP0*n13);
20840 n56 = pow(alpha, NP0*n14);
20841 n57 = pow(alpha, NP0*n15);
20842 n58 = pow(alpha, NP0*n16);
20843 n59 = pow(alpha, NP0*n17);
20855 n71 = pow(alpha, n1*n24);
20856 n72 = pow(n45, -n20);
20857 n73 = pow(n46, -n20);
20900 n116 = log((-1.0 + xPj/xF[0])/n3);
20901 n117 = -n75*xF[12];
20904 n120 = -n76*xF[13];
20908 n124 = n28*n71*xF[0];
20909 n125 = n28*n32*n50;
20910 n126 = n28*n40*n58;
20911 n127 = n28*n30*n48;
20912 n128 = n28*n29*n47;
20913 n129 = n28*n35*n53;
20914 n130 = n123*n90 + 1;
20915 n131 = pow(n130, -n20);
20916 n132 = n116 + n18 + n42 + n60;
20918 n134 = n133*n2*n44;
20919 n135 = n28*n71*n73/(n131*n72);
20920 n136 = n97*(n132 - log(n130)) + 1;
20921 n137 = pow(alpha, n1*n136);
20922 n138 = pow(alpha, n136*n5);
20923 n139 = pow(alpha, n136*n6);
20924 n140 = pow(alpha, n136*n7);
20925 n141 = pow(alpha, n136*n8);
20926 n142 = pow(alpha, n136*n9);
20927 n143 = pow(alpha, n10*n136);
20928 n144 = pow(alpha, n11*n136);
20929 n145 = pow(alpha, n12*n136);
20930 n146 = pow(alpha, n13*n136);
20931 n147 = pow(alpha, n136*n14);
20932 n148 = pow(alpha, n136*n15);
20933 n149 = pow(alpha, n136*n16);
20934 n150 = pow(alpha, n136*n17);
20950 n166 = pow(alpha, n136*n19) + n69 - 1;
20951 n167 = n70 - 1 + 1.0/n138;
20952 n168 = n74 - 1 + 1.0/n139;
20953 n169 = n75 - 1 + 1.0/n140;
20954 n170 = n76 - 1 + 1.0/n141;
20955 n171 = n77 - 1 + 1.0/n142;
20956 n172 = n78 - 1 + 1.0/n143;
20957 n173 = n79 - 1 + 1.0/n144;
20958 n174 = n80 - 1 + 1.0/n145;
20959 n175 = n81 - 1 + 1.0/n146;
20960 n176 = n82 - 1 + 1.0/n147;
20961 n177 = n83 - 1 + 1.0/n148;
20962 n178 = n84 - 1 + 1.0/n149;
20963 n179 = n85 - 1 + 1.0/n150;
20964 n180 = pow(n166, -n20);
20965 n181 = pow(n167, -n20);
20966 n182 = pow(n168, -n20);
20967 n183 = pow(n169, -n20);
20968 n184 = pow(n170, -n20);
20969 n185 = pow(n171, -n20);
20970 n186 = pow(n172, -n20);
20971 n187 = pow(n173, -n20);
20972 n188 = pow(n174, -n20);
20973 n189 = pow(n175, -n20);
20974 n190 = pow(n176, -n20);
20975 n191 = pow(n177, -n20);
20976 n192 = pow(n178, -n20);
20977 n193 = pow(n179, -n20);
20978 n194 = pow(n166, 3);
20979 n195 = pow(n167, 3);
20980 n196 = pow(n168, 3);
20981 n197 = pow(n169, 3);
20982 n198 = pow(n170, 3);
20983 n199 = pow(n171, 3);
20984 n200 = pow(n172, 3);
20985 n201 = pow(n173, 3);
20986 n202 = pow(n174, 3);
20987 n203 = pow(n175, 3);
20988 n204 = pow(n176, 3);
20989 n205 = pow(n177, 3);
20990 n206 = pow(n178, 3);
20991 n207 = pow(n179, 3);
20992 n208 = xF[11]/n168;
20993 n209 = xF[12]/n169;
20995 n211 = xF[10]/n167;
20996 n212 = xF[13]/n170;
21002 n218 = xF[10]/n181;
21003 n219 = n2*xF[4]/n174;
21006 n222 = n2*xF[6]/n176;
21007 n223 = n55*xF[5]/n175;
21008 n224 = n51*xF[1]/n171;
21009 n225 = n57*xF[7]/n177;
21010 n226 = n52*xF[2]/n172;
21014 n230 = n80*xF[4]/n188;
21015 n231 = n80*xF[4]/n202;
21017 n233 = -n83*xF[7]/n205;
21018 n234 = -n77*xF[1]/n185;
21019 n235 = -n83*xF[7]/n191;
21020 n236 = -n84*xF[8]/n192;
21021 n237 = n213*n28*n41*n59;
21022 n238 = n28*n36*n54*xF[4]/n174;
21023 n239 = n28*n38*n56*xF[6]/n176;
21024 n240 = n19*n2*n210*n44*n61;
21025 n241 = n118*n210*n27*n61;
21026 n242 = n128*n211*n61;
21027 n243 = n127*n208*n61;
21028 n244 = n111*n209*n49*n61;
21029 n245 = n125*n212*n61;
21030 n246 = n113*n224*n61;
21031 n247 = n110*n226*n61;
21032 n248 = n129*n215*n61;
21034 n250 = n102*n223*n61;
21036 n252 = n106*n225*n61;
21037 n253 = n126*n214*n61;
21039 n255 = n118*n210*n61*n64;
21040 n256 = n133/n137 + 1;
21041 n257 = n100*n133*n2/n137 + n100*n2;
21042 n258 = n104*n2 + n134*n163;
21043 n259 = n121 + n134*n159;
21044 n260 = n122 + n134*n151;
21045 n261 = n107*n2 + n134*n155;
21046 n262 = n133*n44*n63/n142 + n51*n63;
21047 n263 = n133*n44*n65/n143 + n52*n65;
21048 n264 = n134*n156 + n2*n99;
21049 n265 = n103*n2 + n134*n152;
21050 n266 = n133*n165*n62 + n55*n62;
21051 n267 = n134*n157 + n2*n98;
21052 n268 = n133*n44*n68/n148 + n57*n68;
21053 n269 = n101*n2 + n134*n158;
21054 n270 = n109*n2 + n134*n154;
21055 n271 = pow(n257, -n20);
21056 n272 = pow(n258, -n20);
21057 n273 = pow(n259, -n20);
21058 n274 = pow(n260, -n20);
21059 n275 = pow(n261, -n20);
21060 n276 = pow(n262, -n20);
21061 n277 = pow(n263, -n20);
21062 n278 = pow(n264, -n20);
21063 n279 = pow(n265, -n20);
21064 n280 = pow(n266, -n20);
21065 n281 = pow(n267, -n20);
21066 n282 = pow(n268, -n20);
21067 n283 = pow(n269, -n20);
21068 n284 = pow(n270, -n20);
21070 n286 = n259*xF[11];
21073 n289 = n100*n133*n43/n137 + n100*n43;
21076 n292 = n118*n133*n66/n137 + n118*n66;
21081 n297 = n267*xF[6]/n190;
21084 n300 = n283*n84*xF[8]/n206;
21085 n301 = n273*n74*xF[11]/n196;
21086 n302 = n228*n285*n61;
21087 n303 = n100*n43*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)/n180;
21088 n304 = n104*n218*n43*n61*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2);
21089 n305 = n43*n48*n6*n61*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)/n182;
21090 n306 = n122*n26*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)/n183;
21091 n307 = n107*n43*n61*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)/n184;
21092 n308 = n114*n43*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)/n185;
21093 n309 = n10*n43*n52*n61*xF[2]*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)/n186;
21094 n310 = n216*n43*n61*n99*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99);
21095 n311 = n103*n43*n61*xF[4]*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)/n188;
21096 n312 = n13*n43*n55*n61*xF[5]*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)/n189;
21097 n313 = n43*n61*n98*xF[6]*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)/n190;
21098 n314 = n115*n43*n61*xF[7]*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)/n191;
21099 n315 = n101*n43*n61*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)/n192;
21100 n316 = n109*n43*n61*xF[9]*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)/n193;
21101 n317 = 1.0*n100*n221*n285*n61;
21102 n318 = n228*n293*n61;
21104 n320 = n1*n135*n159 + n100*n133*n159*n28 + n127 - n135*n30/n139;
21105 n321 = n111*n91 + n111*n71*n73/(n131*n140*n72) + n118*n133*n151*n19 + n135*n151*n19;
21106 n322 = n118*n133*n155*n19 + n135*n155*n19 + n135*n32/n141 + n28*n32*n92;
21107 n323 = n110*n93 + n110*n71*n73/(n131*n143*n72) + n118*n133*n161*n19 + n135*n161*n19;
21108 n324 = n118*n133*n157*n19 + n135*n157*n19 + n135*n38/n147 + n28*n38*n96;
21109 n325 = n1*n135*n154 + n100*n133*n154*n28 - n135*n41/n150 + n28*n41*n59;
21110 n326 = n61*n75*xF[12]*(pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91 + n118*n133*n151*n19)/n183;
21111 n327 = n61*n76*xF[13]*(pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n118*n133*n155*n19 + n28*n32*n92)/n184;
21112 n328 = n108*n61*(pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93 + n118*n133*n161*n19)/n186;
21113 n329 = n230*n61*(pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n118*n133*n152*n19 + n28*n36*n94);
21114 n330 = n105*n61*(pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n118*n133*n157*n19 + n28*n38*n96)/n190;
21115 n331 = n218*n61*n88*(pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n100*n133*n163*n28 + n128);
21116 n332 = n61*n89*xF[11]*(pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n100*n133*n159*n28 + n127)/n182;
21117 n333 = n234*n61*(pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n100*n133*n160*n28 + n113*n51);
21118 n334 = n232*n61*(pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n100*n133*n164*n28 + n102*n55);
21119 n335 = n235*n61*(pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n100*n133*n153*n28 + n106*n57);
21120 n336 = n236*n61*(pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n100*n133*n158*n28 + n126);
21121 n337 = n119*n61*(pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n100*n133*n154*n28 + n28*n41*n59)/n193;
21122 n338 = xTj*(n100*n2*n210*n61 + n101*n2*n214*n61 + n103*n219*n61 + n104*n2*n211*n61 + n107*n2*n212*n61 - n108*n263*n61/n186 + n109*n2*n213*n61 + n117*n294*n61 + n119*n295*n61 + n120*n296*n61 + n121*n208*n61 + n122*n209*n61 + n216*n264*n61*n86 + n218*n258*n61*n88 + n220*n61*n99 + n222*n61*n98 + n223*n61*n62 + n224*n61*n63 + n225*n61*n68 + n226*n61*n65 - n230*n265*n61 + n232*n266*n61 + n234*n262*n61 + n235*n268*n61 + n236*n269*n61 + n297*n61*n87 - n302 + n286*n61*n89/n182);
21123 n339 = n240 + n302 + n338;
21124 n340 = n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n318 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337;
21125 n341 = -n108*n263*n61*(n10*n43*n52 + n133*n161*n43*n44)/n200 - n112*n266*n61*(n13*n43*n55 + n133*n164*n43*n44)/n203 + n117*n260*n61*(n133*n151*n43*n44 + n43*n49*n7)/n197 + n119*n270*n61*(n109*n43 + n133*n154*n43*n44)/n207 + n120*n261*n61*(n107*n43 + n133*n155*n43*n44)/n198 + n216*n61*n86*(pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n100*n133*n156*n28 + n129) + n217*n267*n61*n87*(n133*n157*n43*n44 + n43*n98) - n227*n285*n289*n61 - n229*n287*n61*(n114*n43 + n133*n160*n43*n44) - n231*n265*n61*(n103*n43 + n133*n152*n43*n44) + n233*n268*n61*(n115*n43 + n133*n153*n43*n44) + n340 - n288*n61*n84*(n101*n43 + n133*n158*n43*n44)/n206 + n264*n61*n86*xF[3]*(n133*n156*n43*n44 + n43*n99)/n201 + n286*n61*n89*(n133*n159*n43*n44 + n43*n48*n6)/n196 + n258*n61*n88*xF[10]*(n104*n43 + n133*n163*n43*n44)/n195;
21126 NP_b = -n100*n221*n256*n61*n69*xF[0] - n24*(-n0*n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) + n0*xTj*(n105*n20*n281*n61/n204 + n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 + n108*n20*n298*n61 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 + n112*n20*n299*n61 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n20*n227*n290*n61 + n20*n229*n291*n61 + n20*n231*n279*n61 + n20*n300*n61 + n20*n301*n61 + n20*n284*n61*n85*xF[9]/n207 + n20*n282*n61*n83*xF[7]/n205 + n20*n278*n61*n79*xF[3]/n201 + n216*n61*n79*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n19*n28 + pow(alpha, n1*n24 - n11*n136)*n11*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n35*n73/(n131*n72) + n28*n53*n67) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n20*n275*n61*n76*xF[13]/n198 + n20*n274*n61*n75*xF[12]/n197 + n20*n272*n61*n70*xF[10]/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) + 1.0*n100*n221*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2) - 1.0*n227*n290*n61 + n255) - n240 - n61*xTj*(n100*n2*n210 + n101*n2*n214 + n103*n219 + n104*n2*n211 + n107*n2*n212 - n108*n263/n186 + n109*n2*n213 + n117*n294 + n119*n295 + n120*n296 + n121*n208 + n122*n209 + n216*n264*n86 + n218*n258*n88 + n220*n99 + n222*n98 + n223*n62 + n224*n63 + n225*n68 + n226*n65 - n228*n285 - n230*n265 + n232*n266 + n234*n262 + n235*n268 + n236*n269 + n297*n87 + n286*n89/n182);
21127 NP_2a = -n61*(-1.0*n118*n210*n27 + n118*n228*n66*xF[0]*(-1 + (-n21 + xPj*xTj)/(n130*n137*n45)) - n124*n20*n227*pow(n256, -n20)*n27 - 2.0*n124*n256*n27/n180 + 1.0*xTj*(n10*n43*n52*xF[2]*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)/n186 + n100*n43*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)/n180 + n101*n43*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)/n192 + n102*n223 + n103*n43*xF[4]*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)/n188 + n104*n218*n43*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2) + n105*n20*n281/n204 + n105*(pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n118*n133*n157*n19 + n28*n38*n96)/n190 + n106*n225 + n107*n43*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)/n184 + n108*n20*n298 + n108*(pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93 + n118*n133*n161*n19)/n186 + n109*n43*xF[9]*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)/n193 + n110*n226 + n111*n209*n49 + n112*n20*n299 + n113*n224 + n114*n43*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)/n185 + n115*n43*xF[7]*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)/n191 + n118*n210*n27 + n119*(pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n100*n133*n154*n28 + n28*n41*n59)/n193 + n122*n26*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)/n183 + n125*n212 + n126*n214 + n127*n208 + n128*n211 + n129*n215 + n13*n43*n55*xF[5]*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)/n189 + n20*n227*n290 + n20*n229*n291 + n20*n231*n279 + n20*n300 + n20*n301 + n20*n284*n85*xF[9]/n207 + n20*n282*n83*xF[7]/n205 + n20*n278*n79*xF[3]/n201 + n216*n43*n99*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99) + n216*n86*(pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n100*n133*n156*n28 + n129) + n218*n88*(pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n100*n133*n163*n28 + n128) + n228*n293 + n230*(pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n118*n133*n152*n19 + n28*n36*n94) + n232*(pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n100*n133*n164*n28 + n102*n55) + n234*(pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n100*n133*n160*n28 + n113*n51) + n235*(pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n100*n133*n153*n28 + n106*n57) + n236*(pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n100*n133*n158*n28 + n126) + n237 + n238 + n239 + n20*n275*n76*xF[13]/n198 + n20*n274*n75*xF[12]/n197 + n20*n272*n70*xF[10]/n195 + n43*n98*xF[6]*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)/n190 + n76*xF[13]*(pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n118*n133*n155*n19 + n28*n32*n92)/n184 + n75*xF[12]*(pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91 + n118*n133*n151*n19)/n183 + n43*n48*n6*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)/n182 + n89*xF[11]*(pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n100*n133*n159*n28 + n127)/n182));
21128 NP_sqrt_base = (-NP0*n339 - n23*(-n105*n61/(n82 - 1 + pow(alpha, -n14*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n108*n61/(n78 - 1 + pow(alpha, -n10*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n112*n61/(n81 - 1 + pow(alpha, -n13*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n69*xF[0]/(pow(alpha, n19*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1)) + n69 - 1) - n61*n70*xF[10]/(n70 - 1 + pow(alpha, -n5*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n74*xF[11]/(n74 - 1 + pow(alpha, -n6*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n75*xF[12]/(n75 - 1 + pow(alpha, -n7*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n76*xF[13]/(n76 - 1 + pow(alpha, -n8*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n77*xF[1]/(n77 - 1 + pow(alpha, -n9*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n79*xF[3]/(n79 - 1 + pow(alpha, -n11*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n80*xF[4]/(n80 - 1 + pow(alpha, -n12*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n83*xF[7]/(n83 - 1 + pow(alpha, -n15*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n84*xF[8]/(n84 - 1 + pow(alpha, -n16*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n85*xF[9]/(n85 - 1 + pow(alpha, -n17*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1)))) + n61*n69*xF[0]/(-n162 + n69 - 1) - pow(NP0, -n20)*(n0*n227*n285*n289*n61 - n0*n23*(n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 - n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n43 + n10*n43*n52)/n200 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 - n112*n61*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)*(pow(alpha, NP0*n1 - n13*n136)*n13*n133*n43 + n13*n43*n55)/n203 + n117*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)*(pow(alpha, NP0*n1 - n136*n7)*n133*n43*n7 + n43*n49*n7)/n197 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n43 + n109*n43)/n207 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n120*n61*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)*(pow(alpha, NP0*n1 - n136*n8)*n133*n43*n8 + n107*n43)/n198 + n216*n61*n86*(pow(alpha, NP0*n1 - n11*n136)*n1*n11*n133*n28 + pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n129) + n217*n61*n87*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n43 + n43*n98) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) - n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) - n229*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)*(pow(alpha, NP0*n1 - n136*n9)*n133*n43*n9 + n114*n43) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) - n231*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n43 + n103*n43) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n233*n61*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)*(pow(alpha, NP0*n1 - n136*n15)*n133*n15*n43 + n115*n43) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 - n61*n84*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n43 + n101*n43)/n206 + n61*n86*xF[3]*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99)*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n43 + n43*n99)/n201 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)*(pow(alpha, NP0*n1 - n136*n6)*n133*n43*n6 + n43*n48*n6)/n196 + n61*n88*xF[10]*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2)*(pow(alpha, NP0*n1 - n136*n5)*n133*n43*n5 + n104*n43)/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) - n0*n241 - n0*n318 + 1.0*n100*n221*n285*n61))*(4.0*n100*n221*n285*n61 - n20*n23*(n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 - n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n43 + n10*n43*n52)/n200 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 - n112*n61*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)*(pow(alpha, NP0*n1 - n13*n136)*n13*n133*n43 + n13*n43*n55)/n203 + n117*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)*(pow(alpha, NP0*n1 - n136*n7)*n133*n43*n7 + n43*n49*n7)/n197 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n43 + n109*n43)/n207 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n120*n61*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)*(pow(alpha, NP0*n1 - n136*n8)*n133*n43*n8 + n107*n43)/n198 + n216*n61*n86*(pow(alpha, NP0*n1 - n11*n136)*n1*n11*n133*n28 + pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n129) + n217*n61*n87*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n43 + n43*n98) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) - n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) - n229*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)*(pow(alpha, NP0*n1 - n136*n9)*n133*n43*n9 + n114*n43) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) - n231*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n43 + n103*n43) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n233*n61*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)*(pow(alpha, NP0*n1 - n136*n15)*n133*n15*n43 + n115*n43) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 - n61*n84*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n43 + n101*n43)/n206 + n61*n86*xF[3]*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99)*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n43 + n43*n99)/n201 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)*(pow(alpha, NP0*n1 - n136*n6)*n133*n43*n6 + n43*n48*n6)/n196 + n61*n88*xF[10]*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2)*(pow(alpha, NP0*n1 - n136*n5)*n133*n43*n5 + n104*n43)/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) - 4.0*n227*n290*n61 + 2.0*n241 + 2.0*n318) + pow(-n24*(n0*n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) - n0*n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) + n0*xTj*(n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 - n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n43 + n10*n43*n52)/n200 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 - n112*n61*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)*(pow(alpha, NP0*n1 - n13*n136)*n13*n133*n43 + n13*n43*n55)/n203 + n117*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)*(pow(alpha, NP0*n1 - n136*n7)*n133*n43*n7 + n43*n49*n7)/n197 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n43 + n109*n43)/n207 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n120*n61*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)*(pow(alpha, NP0*n1 - n136*n8)*n133*n43*n8 + n107*n43)/n198 + n216*n61*n86*(pow(alpha, NP0*n1 - n11*n136)*n1*n11*n133*n28 + pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n129) + n217*n61*n87*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n43 + n43*n98) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) - n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) - n229*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)*(pow(alpha, NP0*n1 - n136*n9)*n133*n43*n9 + n114*n43) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) - n231*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n43 + n103*n43) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n233*n61*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)*(pow(alpha, NP0*n1 - n136*n15)*n133*n15*n43 + n115*n43) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 - n61*n84*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n43 + n101*n43)/n206 + n61*n86*xF[3]*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99)*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n43 + n43*n99)/n201 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)*(pow(alpha, NP0*n1 - n136*n6)*n133*n43*n6 + n43*n48*n6)/n196 + n61*n88*xF[10]*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2)*(pow(alpha, NP0*n1 - n136*n5)*n133*n43*n5 + n104*n43)/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) + 1.0*n100*n221*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2) + n255) - n339, -n20);
21129 NP_sqrt_base = fabs(NP_sqrt_base);
21130 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
21131 NT1 = n97*(n132 - log(-pow(alpha, NP1*n1)*n123 + 1));
21132 g0 = MW[1] - Mstar;
21133 g1 = MW[0] - Mstar;
21136 g4 = MW[10] - Mstar;
21137 g5 = MW[11] - Mstar;
21138 g6 = MW[12] - Mstar;
21139 g7 = MW[13] - Mstar;
21140 g8 = MW[2] - Mstar;
21141 g9 = MW[3] - Mstar;
21142 g10 = MW[4] - Mstar;
21143 g11 = MW[5] - Mstar;
21144 g12 = MW[6] - Mstar;
21145 g13 = MW[7] - Mstar;
21146 g14 = MW[8] - Mstar;
21147 g15 = MW[9] - Mstar;
21152 g20 = pow(alpha, -g1);
21153 g21 = pow(alpha, -g4);
21154 g22 = pow(alpha, -g5);
21155 g23 = pow(alpha, -g6);
21156 g24 = pow(alpha, -g7);
21157 g25 = pow(alpha, -g0);
21158 g26 = pow(alpha, -g8);
21159 g27 = pow(alpha, -g9);
21160 g28 = pow(alpha, -g10);
21161 g29 = pow(alpha, -g11);
21162 g30 = pow(alpha, -g12);
21163 g31 = pow(alpha, -g13);
21164 g32 = pow(alpha, -g14);
21165 g33 = pow(alpha, -g15);
21166 g34 = log(xF[0]/xF[1]);
21168 g36 = pow(alpha, NP1*g0);
21169 g37 = pow(alpha, NP1*g1);
21170 g38 = pow(alpha, NP1*g4);
21172 g40 = pow(alpha, NP1*g5);
21173 g41 = pow(alpha, NP1*g6);
21174 g42 = pow(alpha, NP1*g7);
21175 g43 = pow(alpha, NP1*g8);
21176 g44 = pow(alpha, NP1*g9);
21177 g45 = pow(alpha, NP1*g10);
21178 g46 = pow(alpha, NP1*g11);
21179 g47 = pow(alpha, NP1*g12);
21180 g48 = pow(alpha, NP1*g13);
21181 g49 = pow(alpha, NP1*g14);
21182 g50 = pow(alpha, NP1*g15);
21216 g84 = g17/(g3*xF[1]);
21217 g85 = pow(alpha, g0*g35) - 1;
21218 g86 = pow(alpha, g0*g35) - 1;
21219 g87 = pow(alpha, g1*g35) - 1;
21220 g88 = pow(alpha, g35*g8) - 1;
21221 g89 = pow(alpha, g35*g9) - 1;
21222 g90 = pow(alpha, g10*g35) - 1;
21223 g91 = pow(alpha, g11*g35) - 1;
21224 g92 = pow(alpha, g12*g35) - 1;
21225 g93 = pow(alpha, g13*g35) - 1;
21226 g94 = pow(alpha, g14*g35) - 1;
21227 g95 = pow(alpha, g15*g35) - 1;
21228 g96 = pow(alpha, g35*g4) - 1;
21229 g97 = pow(alpha, g35*g5) - 1;
21230 g98 = pow(alpha, g35*g6) - 1;
21231 g99 = pow(alpha, g35*g7) - 1;
21232 g100 = -pow(alpha, g1*g35);
21233 g101 = -pow(alpha, g35*g4);
21234 g102 = -pow(alpha, g35*g5);
21235 g103 = -pow(alpha, g35*g6);
21236 g104 = -pow(alpha, g35*g7);
21237 g105 = -pow(alpha, g35*g8);
21238 g106 = -pow(alpha, g35*g9);
21239 g107 = -pow(alpha, g10*g35);
21240 g108 = -pow(alpha, g11*g35);
21241 g109 = -pow(alpha, g12*g35);
21242 g110 = -pow(alpha, g13*g35);
21243 g111 = -pow(alpha, g14*g35);
21244 g112 = -pow(alpha, g15*g35);
21246 g114 = -g100 - g37;
21247 g115 = -g101 - g38;
21248 g116 = -g102 - g40;
21249 g117 = -g103 - g41;
21250 g118 = -g104 - g42;
21251 g119 = -g105 - g43;
21252 g120 = -g106 - g44;
21253 g121 = -g107 - g45;
21254 g122 = -g108 - g46;
21255 g123 = -g109 - g47;
21256 g124 = -g110 - g48;
21257 g125 = -g111 - g49;
21258 g126 = -g112 - g50;
21259 g127 = pow(alpha, g1*g35) + g69;
21261 g129 = pow(alpha, g35*g4) + g70;
21262 g130 = pow(alpha, g35*g5) + g71;
21263 g131 = pow(alpha, g35*g6) + g72;
21264 g132 = pow(alpha, g35*g7) + g73;
21265 g133 = pow(alpha, g35*g8) + g74;
21266 g134 = pow(alpha, g35*g9) + g75;
21267 g135 = pow(alpha, g10*g35) + g76;
21268 g136 = pow(alpha, g11*g35) + g77;
21269 g137 = pow(alpha, g12*g35) + g78;
21270 g138 = pow(alpha, g13*g35) + g79;
21271 g139 = pow(alpha, g14*g35) + g80;
21272 g140 = pow(alpha, g15*g35) + g81;
21273 g141 = xF[11]/g130;
21277 g145 = xF[10]/g129;
21281 g149 = xF[12]/g131;
21282 g150 = xF[13]/g132;
21292 g160 = xF[11]/g116;
21293 g161 = xF[13]/g118;
21297 g165 = xF[12]/g117;
21298 g166 = xF[10]/g115;
21329 g197 = log(g128*g18*g84/g55);
21330 g198 = log(g113*g18*g84/g54);
21331 g199 = log(g128*g19*g52/g86);
21333 g201 = log(g113*g19*g52/g85);
21335 g203 = -g141*g200*(g71 + 1) - g141*g202*(pow(alpha, g35*g5) - 1) - g142*g200*(g81 + 1) - g142*g202*(pow(alpha, g15*g35) - 1) - g143*g200*(g80 + 1) - g143*g202*(pow(alpha, g14*g35) - 1) - g144*g200*g55 - g144*g202*g86 - g145*g200*(g70 + 1) - g145*g202*(pow(alpha, g35*g4) - 1) - g146*g200*(g75 + 1) - g146*g202*(pow(alpha, g35*g9) - 1) - g147*g200*(g79 + 1) - g147*g202*(pow(alpha, g13*g35) - 1) - g148*g200*(g76 + 1) - g148*g202*(pow(alpha, g10*g35) - 1) - g149*g200*(g72 + 1) - g149*g202*(pow(alpha, g35*g6) - 1) - g150*g200*(g73 + 1) - g150*g202*(pow(alpha, g35*g7) - 1) - g151*g200*(g78 + 1) - g151*g202*(pow(alpha, g12*g35) - 1) - g152*g200*(g77 + 1) - g152*g202*(pow(alpha, g11*g35) - 1) - g153*g200*(g74 + 1) - g153*g202*(pow(alpha, g35*g8) - 1) - g154*g200*(g69 + 1) - g154*g202*(pow(alpha, g1*g35) - 1) - g82*xF[0] - g82*xF[10] - g82*xF[11] - g82*xF[12] - g82*xF[13] - g82*xF[1] - g82*xF[2] - g82*xF[3] - g82*xF[4] - g82*xF[5] - g82*xF[6] - g82*xF[7] - g82*xF[8] - g82*xF[9];
21336 LpF = xF[0]*(g20 + 1.0)*(g173*g198 + g184*g201 + g51)/(g39*(g20 - 1.0)) + xF[10]*(g21 + 1.0)*(g181*g198 + g195*g201 + g51)/(g39*(g21 - 1.0)) + xF[11]*(g22 + 1.0)*(g179*g198 + g185*g201 + g51)/(g39*(g22 - 1.0)) + xF[12]*(g23 + 1.0)*(g175*g198 + g192*g201 + g51)/(g39*(g23 - 1.0)) + xF[13]*(g24 + 1.0)*(g176*g198 + g193*g201 + g51)/(g39*(g24 - 1.0)) + xF[1]*(g25 + 1.0)*(g178*g198 + g183*g201 + g51)/(g39*(g25 - 1.0)) + xF[2]*(g26 + 1.0)*(g180*g198 + g186*g201 + g51)/(g39*(g26 - 1.0)) + xF[3]*(g27 + 1.0)*(g177*g198 + g187*g201 + g51)/(g39*(g27 - 1.0)) + xF[4]*(g28 + 1.0)*(g171*g198 + g188*g201 + g51)/(g39*(g28 - 1.0)) + xF[5]*(g29 + 1.0)*(g174*g198 + g196*g201 + g51)/(g39*(g29 - 1.0)) + xF[6]*(g30 + 1.0)*(g169*g198 + g191*g201 + g51)/(g39*(g30 - 1.0)) + xF[7]*(g31 + 1.0)*(g172*g198 + g194*g201 + g51)/(g39*(g31 - 1.0)) + xF[8]*(g32 + 1.0)*(g182*g198 + g189*g201 + g51)/(g39*(g32 - 1.0)) + xF[9]*(g33 + 1.0)*(g170*g198 + g190*g201 + g51)/(g39*(g33 - 1.0));
21341 xP[0] = g156*g53*g87;
21342 xP[1] = g155*g53*g85;
21343 xP[2] = g159*g53*g88;
21344 xP[3] = g162*g53*g89;
21345 xP[4] = g157*g53*g90;
21346 xP[5] = g168*g53*g91;
21347 xP[6] = g163*g53*g92;
21348 xP[7] = g158*g53*g93;
21349 xP[8] = g164*g53*g94;
21350 xP[9] = g167*g53*g95;
21351 xP[10] = g166*g53*g96;
21352 xP[11] = g160*g53*g97;
21353 xP[12] = g165*g53*g98;
21354 xP[13] = g161*g53*g99;
21355 xT[0] = g156*g56*g83;
21356 xT[1] = g155*g54*g83;
21357 xT[2] = g159*g57*g83;
21358 xT[3] = g162*g58*g83;
21359 xT[4] = g157*g59*g83;
21360 xT[5] = g168*g60*g83;
21361 xT[6] = g163*g61*g83;
21362 xT[7] = g158*g62*g83;
21363 xT[8] = g164*g63*g83;
21364 xT[9] = g167*g64*g83;
21365 xT[10] = g166*g65*g83;
21366 xT[11] = g160*g66*g83;
21367 xT[12] = g165*g67*g83;
21368 xT[13] = g161*g68*g83;
21371 n0 = -2.00000000000000;
21372 n1 = MW[0] - Mstar;
21376 n5 = MW[10] - Mstar;
21377 n6 = MW[11] - Mstar;
21378 n7 = MW[12] - Mstar;
21379 n8 = MW[13] - Mstar;
21380 n9 = MW[14] - Mstar;
21381 n10 = MW[1] - Mstar;
21382 n11 = MW[2] - Mstar;
21383 n12 = MW[3] - Mstar;
21384 n13 = MW[4] - Mstar;
21385 n14 = MW[5] - Mstar;
21386 n15 = MW[6] - Mstar;
21387 n16 = MW[7] - Mstar;
21388 n17 = MW[8] - Mstar;
21389 n18 = MW[9] - Mstar;
21397 n26 = pow(n1, -n0);
21398 n27 = pow(n2, -n0);
21399 n28 = pow(n5, -n0);
21400 n29 = pow(n6, -n0);
21401 n30 = pow(n7, -n0);
21402 n31 = pow(n8, -n0);
21403 n32 = pow(n9, -n0);
21404 n33 = pow(n10, -n0);
21405 n34 = pow(n11, -n0);
21406 n35 = pow(n12, -n0);
21407 n36 = pow(n13, -n0);
21408 n37 = pow(n14, -n0);
21409 n38 = pow(n15, -n0);
21410 n39 = pow(n16, -n0);
21411 n40 = pow(n17, -n0);
21412 n41 = pow(n18, -n0);
21415 n44 = pow(alpha, NP0*n1);
21416 n45 = n22 + n25*xF[0];
21417 n46 = n22 + n25*xPj;
21418 n47 = pow(alpha, NP0*n5);
21419 n48 = pow(alpha, NP0*n6);
21420 n49 = pow(alpha, NP0*n7);
21421 n50 = pow(alpha, NP0*n8);
21422 n51 = pow(alpha, NP0*n9);
21423 n52 = pow(alpha, NP0*n10);
21424 n53 = pow(alpha, NP0*n11);
21425 n54 = pow(alpha, NP0*n12);
21426 n55 = pow(alpha, NP0*n13);
21427 n56 = pow(alpha, NP0*n14);
21428 n57 = pow(alpha, NP0*n15);
21429 n58 = pow(alpha, NP0*n16);
21430 n59 = pow(alpha, NP0*n17);
21431 n60 = pow(alpha, NP0*n18);
21442 n71 = pow(alpha, NP0*n0*n20);
21443 n72 = pow(n46, -n0);
21494 n123 = log((-1.0 + xPj/xF[0])/n3);
21495 n124 = -n74*xF[12];
21497 n126 = n116*xF[10];
21498 n127 = -n70*xF[10];
21499 n128 = -n75*xF[13];
21505 n134 = n120*n2*xF[12];
21506 n135 = n27*n31*n50;
21507 n136 = n27*n29*n48;
21508 n137 = n27*n40*n59;
21509 n138 = n27*n36*n55;
21510 n139 = n27*n28*n47;
21511 n140 = n27*n38*n57;
21512 n141 = n27*n35*n54;
21513 n142 = n133*n90 + 1;
21514 n143 = n123 + n19 + n42 + n61;
21517 n146 = n144*n2*n44;
21518 n147 = n100*(n143 - log(n142)) + 1;
21519 n148 = pow(alpha, n1*n147);
21520 n149 = pow(alpha, n147*n5);
21521 n150 = pow(alpha, n147*n6);
21522 n151 = pow(alpha, n147*n7);
21523 n152 = pow(alpha, n147*n8);
21524 n153 = pow(alpha, n147*n9);
21525 n154 = pow(alpha, n10*n147);
21526 n155 = pow(alpha, n11*n147);
21527 n156 = pow(alpha, n12*n147);
21528 n157 = pow(alpha, n13*n147);
21529 n158 = pow(alpha, n14*n147);
21530 n159 = pow(alpha, n147*n15);
21531 n160 = pow(alpha, n147*n16);
21532 n161 = pow(alpha, n147*n17);
21533 n162 = pow(alpha, n147*n18);
21549 n178 = pow(alpha, n147*n20) + n69 - 1;
21550 n179 = n70 - 1 + 1.0/n149;
21551 n180 = n73 - 1 + 1.0/n150;
21552 n181 = n74 - 1 + 1.0/n151;
21553 n182 = n75 - 1 + 1.0/n152;
21554 n183 = n76 - 1 + 1.0/n153;
21555 n184 = n77 - 1 + 1.0/n154;
21556 n185 = n78 - 1 + 1.0/n155;
21557 n186 = n79 - 1 + 1.0/n156;
21558 n187 = n80 - 1 + 1.0/n157;
21559 n188 = n81 - 1 + 1.0/n158;
21560 n189 = n82 - 1 + 1.0/n159;
21561 n190 = n83 - 1 + 1.0/n160;
21562 n191 = n84 - 1 + 1.0/n161;
21563 n192 = n85 - 1 + 1.0/n162;
21564 n193 = pow(n178, 3);
21565 n194 = pow(n179, 3);
21566 n195 = pow(n180, 3);
21567 n196 = pow(n181, 3);
21568 n197 = pow(n182, 3);
21569 n198 = pow(n183, 3);
21570 n199 = pow(n184, 3);
21571 n200 = pow(n185, 3);
21572 n201 = pow(n186, 3);
21573 n202 = pow(n187, 3);
21574 n203 = pow(n188, 3);
21575 n204 = pow(n189, 3);
21576 n205 = pow(n190, 3);
21577 n206 = pow(n191, 3);
21578 n207 = pow(n192, 3);
21579 n208 = xF[11]/n180;
21580 n209 = xF[13]/n182;
21585 n214 = xF[10]/n179;
21586 n215 = pow(n186, n21)*xF[3];
21589 n218 = pow(n187, n21)*xF[4];
21592 n221 = n2*xF[14]/n183;
21593 n222 = n56*xF[5]/n188;
21594 n223 = n52*xF[1]/n184;
21595 n224 = n58*xF[7]/n190;
21596 n225 = n53*xF[2]/n185;
21597 n226 = n49*xF[12]/n181;
21598 n227 = n51*xF[14]/n183;
21599 n228 = n27*n41/n192;
21601 n230 = pow(n178, n21)*n69;
21602 n231 = -n119*pow(n188, n21);
21604 n233 = -pow(n184, n21)*n77*xF[1];
21605 n234 = n62*n98/(n100*n178);
21606 n235 = n2*n20*n62*n98/n178;
21607 n236 = n106*n62*n98/n178;
21608 n237 = n139*n214*n62;
21609 n238 = n136*n208*n62;
21610 n239 = n114*n226*n62;
21611 n240 = n135*n209*n62;
21612 n241 = n122*n227*n62;
21613 n242 = n115*n223*n62;
21614 n243 = n113*n225*n62;
21615 n244 = n141*n211*n62;
21616 n245 = n138*n210*n62;
21617 n246 = n103*n222*n62;
21618 n247 = n140*n213*n62;
21619 n248 = n108*n224*n62;
21620 n249 = n137*n212*n62;
21621 n250 = n228*n62*n99;
21623 n252 = n144/n148 + 1;
21624 n253 = n144*n44/(n100*n148) + n44/n100;
21625 n254 = n116*n2 + n146*n175;
21626 n255 = n131 + n146*n172;
21627 n256 = n120*n2 + n146*n163;
21628 n257 = n109*n2 + n146*n168;
21629 n258 = n112*n2 + n146*n166;
21630 n259 = n144*n44*n64/n154 + n52*n64;
21631 n260 = n144*n44*n65/n155 + n53*n65;
21632 n261 = n102*n2 + n146*n169;
21633 n262 = n104*n2 + n146*n164;
21634 n263 = n144*n177*n63 + n56*n63;
21635 n264 = n101*n2 + n146*n170;
21636 n265 = n144*n44*n68/n160 + n58*n68;
21637 n266 = n132 + n146*n171;
21638 n267 = n144*n44*n66/n162 + n60*n66;
21639 n268 = pow(n253, -n0);
21640 n269 = pow(n254, -n0);
21641 n270 = pow(n255, -n0);
21642 n271 = pow(n256, -n0);
21643 n272 = pow(n257, -n0);
21644 n273 = pow(n258, -n0);
21645 n274 = pow(n259, -n0);
21646 n275 = pow(n260, -n0);
21647 n276 = pow(n261, -n0);
21648 n277 = pow(n262, -n0);
21649 n278 = pow(n263, -n0);
21650 n279 = pow(n264, -n0);
21651 n280 = pow(n265, -n0);
21652 n281 = pow(n266, -n0);
21653 n282 = pow(n267, -n0);
21654 n283 = n255*xF[11];
21656 n285 = n0*n146*n20/n148 + n0*n2*n20*n44;
21658 n287 = n106*n144*n90/n148 + n106*n90;
21659 n288 = pow(n181, n21)*n256;
21660 n289 = pow(n178, n21)*n253;
21661 n290 = pow(n192, n21)*n267;
21662 n291 = pow(n179, n21)*n254;
21663 n292 = pow(n182, n21)*n257;
21664 n293 = pow(n183, n21)*n258;
21665 n294 = pow(n190, n21)*n265;
21666 n295 = pow(n191, n21)*n266;
21667 n296 = pow(n189, n21)*n264*xF[6];
21672 n301 = pow(n178, n21)*n287;
21673 n302 = -n111*n289*n62;
21674 n303 = n0*pow(n178, n21)*n2*n20*n62*n98*(pow(alpha, NP0*n1 + n147*n20)*n144/n100 + n44/n100);
21675 n304 = n126*pow(n179, n21)*n43*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2);
21676 n305 = pow(n180, n21)*n43*n48*n6*n62*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131);
21677 n306 = n120*pow(n181, n21)*n43*n62*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2);
21678 n307 = n109*pow(n182, n21)*n43*n62*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2);
21679 n308 = n112*pow(n183, n21)*n43*n62*xF[14]*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2);
21680 n309 = n118*pow(n184, n21)*n43*n62*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64);
21681 n310 = n11*pow(n185, n21)*n43*n53*n62*xF[2]*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65);
21682 n311 = n102*n215*n43*n62*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2);
21683 n312 = n104*n218*n43*n62*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2);
21684 n313 = n14*pow(n188, n21)*n43*n56*n62*xF[5]*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63);
21685 n314 = n101*pow(n189, n21)*n43*n62*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2);
21686 n315 = n121*pow(n190, n21)*n43*n62*xF[7]*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68);
21687 n316 = n117*pow(n191, n21)*n43*n62*xF[8]*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132);
21688 n317 = n18*pow(n192, n21)*n43*n62*n99*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66);
21689 n318 = 1.0*n289*n62*n98/n100;
21690 n319 = n111*n301*n62;
21692 n321 = n234 + n302;
21693 n322 = -n253*n285/n193;
21694 n323 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n175*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72/n149 + n107*n145*n175 + n139;
21695 n324 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n172*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72/n150 + n107*n145*n172 + n136;
21696 n325 = pow(alpha, n1*n24)*n114*pow(n142, n21)*pow(n45, n21)*n72/n151 + pow(alpha, n1*n24)*pow(n142, n21)*n163*n20*n27*pow(n45, n21)*n72 + n114*n91 + n145*n163*n20*n44;
21697 n326 = pow(alpha, n1*n24)*pow(n142, n21)*n168*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72/n152 + n145*n168*n20*n44 + n27*n31*n92;
21698 n327 = pow(alpha, n1*n24)*n122*pow(n142, n21)*pow(n45, n21)*n72/n153 + pow(alpha, n1*n24)*pow(n142, n21)*n166*n20*n27*pow(n45, n21)*n72 + n122*n93 + n145*n166*n20*n44;
21699 n328 = pow(alpha, n1*n24)*n113*pow(n142, n21)*pow(n45, n21)*n72/n155 + pow(alpha, n1*n24)*pow(n142, n21)*n174*n20*n27*pow(n45, n21)*n72 + n113*n94 + n145*n174*n20*n44;
21700 n329 = pow(alpha, n1*n24)*pow(n142, n21)*n164*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72/n157 + n145*n164*n20*n44 + n27*n36*n95;
21701 n330 = pow(alpha, n1*n24)*pow(n142, n21)*n170*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72/n159 + n145*n170*n20*n44 + n27*n38*n97;
21702 n331 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n165*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*n108*pow(n142, n21)*pow(n45, n21)*n72/n160 + n107*n145*n165 + n108*n58;
21703 n332 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n171*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72/n161 + n107*n145*n171 + n137;
21704 n333 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n167*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72/n162 + n107*n145*n167 + n27*n41*n60;
21705 n334 = pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91 + n145*n163*n20*n44);
21706 n335 = pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n145*n168*n20*n44 + n27*n31*n92);
21707 n336 = n105*pow(n183, n21)*n62*(pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93 + n145*n166*n20*n44);
21708 n337 = n110*pow(n185, n21)*n62*(pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94 + n145*n174*n20*n44);
21709 n338 = n218*n62*n80*(pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n145*n164*n20*n44 + n27*n36*n95);
21710 n339 = pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n145*n170*n20*n44 + n27*n38*n97);
21711 n340 = n127*pow(n179, n21)*n62*(pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n107*n145*n175 + n139);
21712 n341 = pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n107*n145*n172 + n136);
21713 n342 = n233*n62*(pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n173 + n115*n52);
21714 n343 = n215*n62*n86*(pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n107*n145*n169 + n141);
21715 n344 = n231*n62*(pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56 + n107*n145*n176);
21716 n345 = n130*pow(n190, n21)*n62*(pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n165 + n108*n58);
21717 n346 = n129*pow(n191, n21)*n62*(pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n107*n145*n171 + n137);
21718 n347 = n125*pow(n192, n21)*n62*(pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n107*n145*n167 + n27*n41*n60);
21719 n348 = n251 + n318 + n320;
21720 n349 = n101*n2*n213*n62 + n102*n2*n211*n62 + n104*n2*n210*n62 - n105*n293*n62 + n109*n2*n209*n62 - n110*pow(n185, n21)*n260*n62 + n112*n221*n62 + n124*n288*n62 + n125*n290*n62 + n126*n217*n62 + n127*n291*n62 + n128*n292*n62 + n129*n295*n62 + n130*n294*n62 + n131*n208*n62 + n132*n212*n62 + n134*n62/n181 + pow(n180, n21)*n283*n62*n87 + n215*n261*n62*n86 + n218*n262*n62*n89 + n222*n62*n63 + n223*n62*n64 + n224*n62*n68 + n225*n62*n65 + n231*n263*n62 + n233*n259*n62 + n296*n62*n88 + n321 + n62*n66*n99/n192;
21722 n351 = n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n319 + n334 + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347;
21723 n352 = -n105*n258*n62*(n112*n43 + n144*n166*n43*n44)/n198 - n110*n260*n62*(n11*n43*n53 + n144*n174*n43*n44)/n200 + n111*n322*n62 - n119*n263*n62*(n14*n43*n56 + n144*n176*n43*n44)/n203 + n124*n256*n62*(n120*n43 + n144*n163*n43*n44)/n196 + n125*n267*n62*(n144*n167*n43*n44 + n18*n43*n60)/n207 + n127*n254*n62*(n116*n43 + n144*n175*n43*n44)/n194 + n128*n257*n62*(n109*n43 + n144*n168*n43*n44)/n197 + n129*n266*n62*(n117*n43 + n144*n171*n43*n44)/n206 + n216*n264*n62*n88*(n101*n43 + n144*n170*n43*n44) + n220*n262*n62*n89*(n104*n43 + n144*n164*n43*n44) - n229*n284*n62*(n118*n43 + n144*n173*n43*n44) + n232*n265*n62*(n121*n43 + n144*n165*n43*n44) + n351 + n261*n62*n86*xF[3]*(n102*n43 + n144*n169*n43*n44)/n201 + n283*n62*n87*(n144*n172*n43*n44 + n43*n48*n6)/n195;
21724 NP_b = -n235 - n24*(0.5*n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - 1.0*n111*n298*n62 + n251 - 0.5*xTj*(n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n145*n20*n9 + pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93) + n105*n21*n297*n62 + n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n11*n145*n20 + pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94) + n110*n21*n299*n62 + n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) + n111*n21*n298*n62 + n119*n21*n300*n62 + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n1*n145*n18 + pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n27*n41*n60) + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n1*n145*n5 + pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n139) + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n1*n145*n17 + pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n137) + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n1*n145*n16 + pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n108*n58) + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n1*n145*n6 + pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n136) + pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n145*n20*n7 + pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91) + pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n145*n20*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n27*n31*n92) + pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n145*n15*n20 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n27*n38*n97) + n21*n216*n279*n62*n82 + n21*n220*n277*n62*n80 + n21*n229*n286*n62 + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n1*n12*n145 + pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n141) + n218*n62*n80*(pow(alpha, NP0*n1 - n13*n147)*n13*n145*n20 + pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n27*n36*n95) + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n1*n14*n145 + pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n1*n10*n145 + pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n115*n52) + n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n21*n282*n62*n85*xF[9]/n207 + n21*n281*n62*n84*xF[8]/n206 + n21*n280*n62*n83*xF[7]/n205 + n21*n276*n62*n79*xF[3]/n201 + n21*n272*n62*n75*xF[13]/n197 + n21*n271*n62*n74*xF[12]/n196 + n21*n270*n62*n73*xF[11]/n195 + n21*n269*n62*n70*xF[10]/n194) + 1.0*pow(n178, n21)*n62*n98*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)/n100) - n62*xTj*(n101*n2*n213 + n102*n2*n211 + n104*n2*n210 - n105*n293 + n109*n2*n209 - n110*pow(n185, n21)*n260 - n111*n289 + n112*n221 + n124*n288 + n125*n290 + n126*n217 + n127*n291 + n128*n292 + n129*n295 + n130*n294 + n131*n208 + n132*n212 + n134/n181 + pow(n180, n21)*n283*n87 + n215*n261*n86 + n218*n262*n89 + n222*n63 + n223*n64 + n224*n68 + n225*n65 + n231*n263 + n233*n259 + n296*n88 + n66*n99/n192 + n98/(n100*n178)) - n230*n252*n62*n98/n100;
21725 NP_2a = -n62*(-pow(alpha, n1*n24)*n0*n106*n111*pow(n252, -n0)/n193 + pow(alpha, n1*n24)*n0*n106*pow(n178, n21)*n252*xF[0] + n106*n111*pow(n178, n21)*n90*(-1 + (-n22 + xPj*xTj)/(n142*n148*n45)) - 1.0*n106*n98/n178 + 1.0*xTj*(n0*pow(n178, n21)*n2*n20*n98*(pow(alpha, NP0*n1 + n147*n20)*n144/n100 + n44/n100) + n101*pow(n189, n21)*n43*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2) + n102*n215*n43*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2) + n103*n222 + n104*n218*n43*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2) + n105*pow(n183, n21)*(pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93 + n145*n166*n20*n44) + n105*n21*n297 + n106*n98/n178 + n108*n224 + n109*pow(n182, n21)*n43*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2) + n11*pow(n185, n21)*n43*n53*xF[2]*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65) + n110*pow(n185, n21)*(pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94 + n145*n174*n20*n44) + n110*n21*n299 + n111*n21*n298 + n111*n301 + n112*pow(n183, n21)*n43*xF[14]*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2) + n113*n225 + n114*n226 + n115*n223 + n117*pow(n191, n21)*n43*xF[8]*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132) + n118*pow(n184, n21)*n43*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64) + n119*n21*n300 + n120*pow(n181, n21)*n43*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2) + n121*pow(n190, n21)*n43*xF[7]*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68) + n122*n227 + n125*pow(n192, n21)*(pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n107*n145*n167 + n27*n41*n60) + n126*pow(n179, n21)*n43*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2) + n127*pow(n179, n21)*(pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n107*n145*n175 + n139) + n129*pow(n191, n21)*(pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n107*n145*n171 + n137) + n130*pow(n190, n21)*(pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n165 + n108*n58) + n135*n209 + n136*n208 + n137*n212 + n138*n210 + n139*n214 + n14*pow(n188, n21)*n43*n56*xF[5]*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63) + n140*n213 + n141*n211 + n18*pow(n192, n21)*n43*n99*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66) + pow(n180, n21)*n43*n48*n6*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131) + pow(n180, n21)*n87*xF[11]*(pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n107*n145*n172 + n136) + pow(n181, n21)*n74*xF[12]*(pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91 + n145*n163*n20*n44) + pow(n182, n21)*n75*xF[13]*(pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n145*n168*n20*n44 + n27*n31*n92) + pow(n189, n21)*n82*xF[6]*(pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n145*n170*n20*n44 + n27*n38*n97) + n21*n216*n279*n82 + n21*n220*n277*n80 + n21*n229*n286 + n215*n86*(pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n107*n145*n169 + n141) + n218*n80*(pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n145*n164*n20*n44 + n27*n36*n95) + n228*n99 + n231*(pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56 + n107*n145*n176) + n233*(pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n173 + n115*n52) + n21*n282*n85*xF[9]/n207 + n21*n281*n84*xF[8]/n206 + n21*n280*n83*xF[7]/n205 + n21*n276*n79*xF[3]/n201 + n21*n272*n75*xF[13]/n197 + n21*n271*n74*xF[12]/n196 + n21*n270*n73*xF[11]/n195 + n21*n269*n70*xF[10]/n194));
21726 NP_sqrt_base = (NP0*(n25*(n101*n2*n213*n62 + n102*n2*n211*n62 + n104*n2*n210*n62 - n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2) + n109*n2*n209*n62 - n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65) - n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100) + n112*n221*n62 + n124*pow(n181, n21)*n62*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2) + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66) + n126*n217*n62 + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2) + n128*pow(n182, n21)*n62*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2) + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132) + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68) + n131*n208*n62 + n132*n212*n62 + n134*n62/n181 + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131) + pow(n189, n21)*n62*n88*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2) + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2) + n218*n62*n89*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2) + n222*n62*n63 + n223*n62*n64 + n224*n62*n68 + n225*n62*n65 + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64) + n234 + n62*n66*n99/n192) + n321) + n111*n62/n178 + xTj*(-n105*n62/n183 - n110*n62/n185 + n111*n219*n62 - n119*n62/n188 + n124*n62/n181 + n125*n62/n192 + n127*n62/n179 + n128*n62/n182 + n129*n62/n191 + n130*n62/n190 + n208*n62*n87 + n210*n62*n89 + n211*n62*n86 + n213*n62*n88 - n62*n77*xF[1]/n184) + pow(NP0, -n0)*(0.5*n111*n253*n285*n62/n193 - 0.5*n236 - 0.5*n319 + 0.5*n352*xTj - 1.0*n289*n62*n98/n100))*(-n0*n236 - n0*n25*(n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n145*n20*n9 + pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93) - n105*n62*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2)*(pow(alpha, NP0*n1 - n147*n9)*n144*n43*n9 + n112*n43)/n198 + n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n11*n145*n20 + pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94) - n110*n62*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65)*(pow(alpha, NP0*n1 - n11*n147)*n11*n144*n43 + n11*n43*n53)/n200 + n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - n111*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)*(pow(alpha, NP0*n1 - n1*n147)*n0*n144*n2*n20 + n0*n2*n20*n44)/n193 - n119*n62*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63)*(pow(alpha, NP0*n1 - n14*n147)*n14*n144*n43 + n14*n43*n56)/n203 + n124*n62*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2)*(pow(alpha, NP0*n1 - n147*n7)*n144*n43*n7 + n120*n43)/n196 + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n1*n145*n18 + pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n27*n41*n60) + n125*n62*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66)*(pow(alpha, NP0*n1 - n147*n18)*n144*n18*n43 + n18*n43*n60)/n207 + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n1*n145*n5 + pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n139) + n127*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2)*(pow(alpha, NP0*n1 - n147*n5)*n144*n43*n5 + n116*n43)/n194 + n128*n62*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2)*(pow(alpha, NP0*n1 - n147*n8)*n144*n43*n8 + n109*n43)/n197 + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n1*n145*n17 + pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n137) + n129*n62*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132)*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n43 + n117*n43)/n206 + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n1*n145*n16 + pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n108*n58) + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n1*n145*n6 + pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n136) + pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n145*n20*n7 + pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91) + pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n145*n20*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n27*n31*n92) + pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n145*n15*n20 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n27*n38*n97) + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n1*n12*n145 + pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n141) + n216*n62*n88*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2)*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n43 + n101*n43) + n218*n62*n80*(pow(alpha, NP0*n1 - n13*n147)*n13*n145*n20 + pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n27*n36*n95) + n220*n62*n89*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2)*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n43 + n104*n43) - n229*n62*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64)*(pow(alpha, NP0*n1 - n10*n147)*n10*n144*n43 + n118*n43) + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n1*n14*n145 + pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56) + n232*n62*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68)*(pow(alpha, NP0*n1 - n147*n16)*n144*n16*n43 + n121*n43) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n1*n10*n145 + pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n115*n52) + n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n62*n86*xF[3]*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2)*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n43 + n102*n43)/n201 + n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131)*(pow(alpha, NP0*n1 - n147*n6)*n144*n43*n6 + n43*n48*n6)/n195) - n0*n319 - 4.0*n111*n298*n62 + 4.0*n289*n62*n98/n100) + pow(-n111*n289*n62 - n235 - n24*(0.5*n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - 0.5*n111*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)*(pow(alpha, NP0*n1 - n1*n147)*n0*n144*n2*n20 + n0*n2*n20*n44)/n193 + n251 - 0.5*xTj*(n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n145*n20*n9 + pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93) - n105*n62*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2)*(pow(alpha, NP0*n1 - n147*n9)*n144*n43*n9 + n112*n43)/n198 + n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n11*n145*n20 + pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94) - n110*n62*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65)*(pow(alpha, NP0*n1 - n11*n147)*n11*n144*n43 + n11*n43*n53)/n200 + n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - n111*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)*(pow(alpha, NP0*n1 - n1*n147)*n0*n144*n2*n20 + n0*n2*n20*n44)/n193 - n119*n62*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63)*(pow(alpha, NP0*n1 - n14*n147)*n14*n144*n43 + n14*n43*n56)/n203 + n124*n62*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2)*(pow(alpha, NP0*n1 - n147*n7)*n144*n43*n7 + n120*n43)/n196 + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n1*n145*n18 + pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n27*n41*n60) + n125*n62*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66)*(pow(alpha, NP0*n1 - n147*n18)*n144*n18*n43 + n18*n43*n60)/n207 + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n1*n145*n5 + pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n139) + n127*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2)*(pow(alpha, NP0*n1 - n147*n5)*n144*n43*n5 + n116*n43)/n194 + n128*n62*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2)*(pow(alpha, NP0*n1 - n147*n8)*n144*n43*n8 + n109*n43)/n197 + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n1*n145*n17 + pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n137) + n129*n62*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132)*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n43 + n117*n43)/n206 + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n1*n145*n16 + pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n108*n58) + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n1*n145*n6 + pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n136) + pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n145*n20*n7 + pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91) + pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n145*n20*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n27*n31*n92) + pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n145*n15*n20 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n27*n38*n97) + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n1*n12*n145 + pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n141) + n216*n62*n88*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2)*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n43 + n101*n43) + n218*n62*n80*(pow(alpha, NP0*n1 - n13*n147)*n13*n145*n20 + pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n27*n36*n95) + n220*n62*n89*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2)*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n43 + n104*n43) - n229*n62*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64)*(pow(alpha, NP0*n1 - n10*n147)*n10*n144*n43 + n118*n43) + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n1*n14*n145 + pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56) + n232*n62*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68)*(pow(alpha, NP0*n1 - n147*n16)*n144*n16*n43 + n121*n43) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n1*n10*n145 + pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n115*n52) + n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n62*n86*xF[3]*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2)*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n43 + n102*n43)/n201 + n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131)*(pow(alpha, NP0*n1 - n147*n6)*n144*n43*n6 + n43*n48*n6)/n195) + 1.0*pow(n178, n21)*n62*n98*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)/n100) - n350, -n0);
21727 NP_sqrt_base = fabs(NP_sqrt_base);
21728 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
21729 NT1 = n100*(n143 - log(-pow(alpha, NP1*n1)*n133 + 1));
21730 g0 = MW[1] - Mstar;
21731 g1 = MW[0] - Mstar;
21734 g4 = MW[10] - Mstar;
21735 g5 = MW[11] - Mstar;
21736 g6 = MW[12] - Mstar;
21737 g7 = MW[13] - Mstar;
21738 g8 = MW[14] - Mstar;
21739 g9 = MW[2] - Mstar;
21740 g10 = MW[3] - Mstar;
21741 g11 = MW[4] - Mstar;
21742 g12 = MW[5] - Mstar;
21743 g13 = MW[6] - Mstar;
21744 g14 = MW[7] - Mstar;
21745 g15 = MW[8] - Mstar;
21746 g16 = MW[9] - Mstar;
21751 g21 = pow(alpha, -g1);
21752 g22 = pow(alpha, -g4);
21753 g23 = pow(alpha, -g5);
21754 g24 = pow(alpha, -g6);
21755 g25 = pow(alpha, -g7);
21756 g26 = pow(alpha, -g8);
21757 g27 = pow(alpha, -g0);
21758 g28 = pow(alpha, -g9);
21759 g29 = pow(alpha, -g10);
21760 g30 = pow(alpha, -g11);
21761 g31 = pow(alpha, -g12);
21762 g32 = pow(alpha, -g13);
21763 g33 = pow(alpha, -g14);
21764 g34 = pow(alpha, -g15);
21765 g35 = pow(alpha, -g16);
21766 g36 = log(xF[0]/xF[1]);
21768 g38 = pow(alpha, NP1*g0);
21769 g39 = pow(alpha, NP1*g1);
21770 g40 = pow(alpha, NP1*g4);
21772 g42 = pow(alpha, NP1*g5);
21773 g43 = pow(alpha, NP1*g6);
21774 g44 = pow(alpha, NP1*g7);
21775 g45 = pow(alpha, NP1*g8);
21776 g46 = pow(alpha, NP1*g9);
21777 g47 = pow(alpha, NP1*g10);
21778 g48 = pow(alpha, NP1*g11);
21779 g49 = pow(alpha, NP1*g12);
21780 g50 = pow(alpha, NP1*g13);
21781 g51 = pow(alpha, NP1*g14);
21782 g52 = pow(alpha, NP1*g15);
21783 g53 = pow(alpha, NP1*g16);
21819 g89 = g18/(g3*xF[1]);
21820 g90 = pow(alpha, g0*g37) - 1;
21821 g91 = pow(alpha, g0*g37) - 1;
21822 g92 = pow(alpha, g1*g37) - 1;
21823 g93 = pow(alpha, g37*g9) - 1;
21824 g94 = pow(alpha, g10*g37) - 1;
21825 g95 = pow(alpha, g11*g37) - 1;
21826 g96 = pow(alpha, g12*g37) - 1;
21827 g97 = pow(alpha, g13*g37) - 1;
21828 g98 = pow(alpha, g14*g37) - 1;
21829 g99 = pow(alpha, g15*g37) - 1;
21830 g100 = pow(alpha, g16*g37) - 1;
21831 g101 = pow(alpha, g37*g4) - 1;
21832 g102 = pow(alpha, g37*g5) - 1;
21833 g103 = pow(alpha, g37*g6) - 1;
21834 g104 = pow(alpha, g37*g7) - 1;
21835 g105 = pow(alpha, g37*g8) - 1;
21836 g106 = -pow(alpha, g1*g37);
21837 g107 = -pow(alpha, g37*g4);
21838 g108 = -pow(alpha, g37*g5);
21839 g109 = -pow(alpha, g37*g6);
21840 g110 = -pow(alpha, g37*g7);
21841 g111 = -pow(alpha, g37*g8);
21842 g112 = -pow(alpha, g37*g9);
21843 g113 = -pow(alpha, g10*g37);
21844 g114 = -pow(alpha, g11*g37);
21845 g115 = -pow(alpha, g12*g37);
21846 g116 = -pow(alpha, g13*g37);
21847 g117 = -pow(alpha, g14*g37);
21848 g118 = -pow(alpha, g15*g37);
21849 g119 = -pow(alpha, g16*g37);
21851 g121 = -g106 - g39;
21852 g122 = -g107 - g40;
21853 g123 = -g108 - g42;
21854 g124 = -g109 - g43;
21855 g125 = -g110 - g44;
21856 g126 = -g111 - g45;
21857 g127 = -g112 - g46;
21858 g128 = -g113 - g47;
21859 g129 = -g114 - g48;
21860 g130 = -g115 - g49;
21861 g131 = -g116 - g50;
21862 g132 = -g117 - g51;
21863 g133 = -g118 - g52;
21864 g134 = -g119 - g53;
21865 g135 = pow(alpha, g1*g37) + g73;
21867 g137 = pow(alpha, g37*g4) + g74;
21868 g138 = pow(alpha, g37*g5) + g75;
21869 g139 = pow(alpha, g37*g6) + g76;
21870 g140 = pow(alpha, g37*g7) + g77;
21871 g141 = pow(alpha, g37*g8) + g78;
21872 g142 = pow(alpha, g37*g9) + g79;
21873 g143 = pow(alpha, g10*g37) + g80;
21874 g144 = pow(alpha, g11*g37) + g81;
21875 g145 = pow(alpha, g12*g37) + g82;
21876 g146 = pow(alpha, g13*g37) + g83;
21877 g147 = pow(alpha, g14*g37) + g84;
21878 g148 = pow(alpha, g15*g37) + g85;
21879 g149 = pow(alpha, g16*g37) + g86;
21880 g150 = xF[11]/g138;
21884 g154 = xF[10]/g137;
21888 g158 = xF[12]/g139;
21889 g159 = xF[13]/g140;
21891 g161 = xF[14]/g141;
21900 g170 = xF[11]/g123;
21901 g171 = xF[13]/g125;
21904 g174 = xF[14]/g126;
21906 g176 = xF[12]/g124;
21907 g177 = xF[10]/g122;
21940 g210 = log(g136*g19*g89/g58);
21941 g211 = log(g120*g19*g89/g57);
21942 g212 = log(g136*g20*g55/g91);
21944 g214 = log(g120*g20*g55/g90);
21946 g216 = -g150*g213*(g75 + 1) - g150*g215*(pow(alpha, g37*g5) - 1) - g151*g213*(g86 + 1) - g151*g215*(pow(alpha, g16*g37) - 1) - g152*g213*(g85 + 1) - g152*g215*(pow(alpha, g15*g37) - 1) - g153*g213*g58 - g153*g215*g91 - g154*g213*(g74 + 1) - g154*g215*(pow(alpha, g37*g4) - 1) - g155*g213*(g80 + 1) - g155*g215*(pow(alpha, g10*g37) - 1) - g156*g213*(g84 + 1) - g156*g215*(pow(alpha, g14*g37) - 1) - g157*g213*(g81 + 1) - g157*g215*(pow(alpha, g11*g37) - 1) - g158*g213*(g76 + 1) - g158*g215*(pow(alpha, g37*g6) - 1) - g159*g213*(g77 + 1) - g159*g215*(pow(alpha, g37*g7) - 1) - g160*g213*(g83 + 1) - g160*g215*(pow(alpha, g13*g37) - 1) - g161*g213*(g78 + 1) - g161*g215*(pow(alpha, g37*g8) - 1) - g162*g213*(g82 + 1) - g162*g215*(pow(alpha, g12*g37) - 1) - g163*g213*(g79 + 1) - g163*g215*(pow(alpha, g37*g9) - 1) - g164*g213*(g73 + 1) - g164*g215*(pow(alpha, g1*g37) - 1) - g87*xF[0] - g87*xF[10] - g87*xF[11] - g87*xF[12] - g87*xF[13] - g87*xF[14] - g87*xF[1] - g87*xF[2] - g87*xF[3] - g87*xF[4] - g87*xF[5] - g87*xF[6] - g87*xF[7] - g87*xF[8] - g87*xF[9];
21947 LpF = xF[0]*(g21 + 1.0)*(g184*g211 + g196*g214 + g54)/(g41*(g21 - 1.0)) + xF[10]*(g22 + 1.0)*(g193*g211 + g208*g214 + g54)/(g41*(g22 - 1.0)) + xF[11]*(g23 + 1.0)*(g190*g211 + g197*g214 + g54)/(g41*(g23 - 1.0)) + xF[12]*(g24 + 1.0)*(g186*g211 + g205*g214 + g54)/(g41*(g24 - 1.0)) + xF[13]*(g25 + 1.0)*(g187*g211 + g206*g214 + g54)/(g41*(g25 - 1.0)) + xF[14]*(g26 + 1.0)*(g192*g211 + g204*g214 + g54)/(g41*(g26 - 1.0)) + xF[1]*(g27 + 1.0)*(g189*g211 + g195*g214 + g54)/(g41*(g27 - 1.0)) + xF[2]*(g28 + 1.0)*(g191*g211 + g198*g214 + g54)/(g41*(g28 - 1.0)) + xF[3]*(g29 + 1.0)*(g188*g211 + g199*g214 + g54)/(g41*(g29 - 1.0)) + xF[4]*(g30 + 1.0)*(g182*g211 + g200*g214 + g54)/(g41*(g30 - 1.0)) + xF[5]*(g31 + 1.0)*(g185*g211 + g209*g214 + g54)/(g41*(g31 - 1.0)) + xF[6]*(g32 + 1.0)*(g180*g211 + g203*g214 + g54)/(g41*(g32 - 1.0)) + xF[7]*(g33 + 1.0)*(g183*g211 + g207*g214 + g54)/(g41*(g33 - 1.0)) + xF[8]*(g34 + 1.0)*(g194*g211 + g201*g214 + g54)/(g41*(g34 - 1.0)) + xF[9]*(g35 + 1.0)*(g181*g211 + g202*g214 + g54)/(g41*(g35 - 1.0));
21952 xP[0] = g166*g56*g92;
21953 xP[1] = g165*g56*g90;
21954 xP[2] = g169*g56*g93;
21955 xP[3] = g172*g56*g94;
21956 xP[4] = g167*g56*g95;
21957 xP[5] = g179*g56*g96;
21958 xP[6] = g173*g56*g97;
21959 xP[7] = g168*g56*g98;
21960 xP[8] = g175*g56*g99;
21961 xP[9] = g100*g178*g56;
21962 xP[10] = g101*g177*g56;
21963 xP[11] = g102*g170*g56;
21964 xP[12] = g103*g176*g56;
21965 xP[13] = g104*g171*g56;
21966 xP[14] = g105*g174*g56;
21967 xT[0] = g166*g59*g88;
21968 xT[1] = g165*g57*g88;
21969 xT[2] = g169*g60*g88;
21970 xT[3] = g172*g61*g88;
21971 xT[4] = g167*g62*g88;
21972 xT[5] = g179*g63*g88;
21973 xT[6] = g173*g64*g88;
21974 xT[7] = g168*g65*g88;
21975 xT[8] = g175*g66*g88;
21976 xT[9] = g178*g67*g88;
21977 xT[10] = g177*g68*g88;
21978 xT[11] = g170*g69*g88;
21979 xT[12] = g176*g70*g88;
21980 xT[13] = g171*g71*g88;
21981 xT[14] = g174*g72*g88;
21984 n0 = -2.00000000000000;
21985 n1 = MW[0] - Mstar;
21989 n5 = MW[10] - Mstar;
21990 n6 = MW[11] - Mstar;
21991 n7 = MW[12] - Mstar;
21992 n8 = MW[13] - Mstar;
21993 n9 = MW[14] - Mstar;
21994 n10 = MW[15] - Mstar;
21995 n11 = MW[1] - Mstar;
21996 n12 = MW[2] - Mstar;
21997 n13 = MW[3] - Mstar;
21998 n14 = MW[4] - Mstar;
21999 n15 = MW[5] - Mstar;
22000 n16 = MW[6] - Mstar;
22001 n17 = MW[7] - Mstar;
22002 n18 = MW[8] - Mstar;
22003 n19 = MW[9] - Mstar;
22012 n28 = pow(n1, -n0);
22013 n29 = pow(n2, -n0);
22014 n30 = pow(n5, -n0);
22015 n31 = pow(n6, -n0);
22016 n32 = pow(n7, -n0);
22017 n33 = pow(n8, -n0);
22018 n34 = pow(n9, -n0);
22019 n35 = pow(n10, -n0);
22020 n36 = pow(n11, -n0);
22021 n37 = pow(n12, -n0);
22022 n38 = pow(n13, -n0);
22023 n39 = pow(n14, -n0);
22024 n40 = pow(n15, -n0);
22025 n41 = pow(n16, -n0);
22026 n42 = pow(n17, -n0);
22027 n43 = pow(n18, -n0);
22028 n44 = pow(n19, -n0);
22033 n49 = pow(alpha, n47);
22034 n50 = n23 + n25*xF[0];
22035 n51 = n23 + n25*xPj;
22036 n52 = pow(alpha, NP0*n5);
22037 n53 = pow(alpha, NP0*n6);
22038 n54 = pow(alpha, NP0*n7);
22039 n55 = pow(alpha, NP0*n8);
22040 n56 = pow(alpha, NP0*n9);
22041 n57 = pow(alpha, NP0*n10);
22042 n58 = pow(alpha, NP0*n11);
22043 n59 = pow(alpha, NP0*n12);
22044 n60 = pow(alpha, NP0*n13);
22045 n61 = pow(alpha, NP0*n14);
22046 n62 = pow(alpha, NP0*n15);
22047 n63 = pow(alpha, NP0*n16);
22048 n64 = pow(alpha, NP0*n17);
22049 n65 = pow(alpha, NP0*n18);
22050 n66 = pow(alpha, NP0*n19);
22062 n78 = pow(alpha, NP0*n0*n21);
22063 n79 = pow(n51, -n0);
22113 n129 = log((-1.0 + xPj/xF[0])/n3);
22114 n130 = -n84*xF[15];
22115 n131 = -n81*xF[12];
22117 n133 = n19*n66*xF[9];
22118 n134 = -n82*xF[13];
22122 n138 = n29*n33*n55;
22123 n139 = n29*n31*n53;
22124 n140 = n29*n43*n65;
22125 n141 = n29*n32*n54;
22126 n142 = n29*n30*n52;
22127 n143 = n29*n38*n60;
22128 n144 = n121*n49*xF[0];
22129 n145 = n137*n98 + 1;
22130 n146 = n129 + n20 + n45 + n67;
22131 n147 = n137*n49/n145;
22132 n148 = n107*(n146 - log(n145)) + 1;
22133 n149 = pow(alpha, n1*n148);
22134 n150 = pow(alpha, n148*n5);
22135 n151 = pow(alpha, n148*n6);
22136 n152 = pow(alpha, n148*n7);
22137 n153 = pow(alpha, n148*n8);
22138 n154 = pow(alpha, n148*n9);
22139 n155 = pow(alpha, n10*n148);
22140 n156 = pow(alpha, n11*n148);
22141 n157 = pow(alpha, n12*n148);
22142 n158 = pow(alpha, n13*n148);
22143 n159 = pow(alpha, n14*n148);
22144 n160 = pow(alpha, n148*n15);
22145 n161 = pow(alpha, n148*n16);
22146 n162 = pow(alpha, n148*n17);
22147 n163 = pow(alpha, n148*n18);
22148 n164 = pow(alpha, n148*n19);
22165 n181 = pow(alpha, n148*n21) + n76 - 1;
22166 n182 = n77 - 1 + 1.0/n150;
22167 n183 = n80 - 1 + 1.0/n151;
22168 n184 = n81 - 1 + 1.0/n152;
22169 n185 = n82 - 1 + 1.0/n153;
22170 n186 = n83 - 1 + 1.0/n154;
22171 n187 = n84 - 1 + 1.0/n155;
22172 n188 = n85 - 1 + 1.0/n156;
22173 n189 = n86 - 1 + 1.0/n157;
22174 n190 = n87 - 1 + 1.0/n158;
22175 n191 = n88 - 1 + 1.0/n159;
22176 n192 = n89 - 1 + 1.0/n160;
22177 n193 = n90 - 1 + 1.0/n161;
22178 n194 = n91 - 1 + 1.0/n162;
22179 n195 = n92 - 1 + 1.0/n163;
22180 n196 = n93 - 1 + 1.0/n164;
22181 n197 = pow(n181, 3);
22182 n198 = pow(n182, 3);
22183 n199 = pow(n183, 3);
22184 n200 = pow(n184, 3);
22185 n201 = pow(n185, 3);
22186 n202 = pow(n186, 3);
22187 n203 = pow(n187, 3);
22188 n204 = pow(n188, 3);
22189 n205 = pow(n189, 3);
22190 n206 = pow(n190, 3);
22191 n207 = pow(n191, 3);
22192 n208 = pow(n192, 3);
22193 n209 = pow(n193, 3);
22194 n210 = pow(n194, 3);
22195 n211 = pow(n195, 3);
22196 n212 = pow(n196, 3);
22197 n213 = xF[11]/n183;
22198 n214 = xF[12]/n184;
22200 n216 = xF[10]/n182;
22201 n217 = xF[13]/n185;
22206 n222 = pow(n190, n22)*xF[3];
22208 n224 = pow(n182, n22)*xF[10];
22209 n225 = xF[10]/n198;
22210 n226 = n2*xF[14]/n186;
22211 n227 = n2*xF[4]/n191;
22213 n229 = pow(n181, n22)*n2;
22214 n230 = n2*xF[6]/n193;
22215 n231 = n62*xF[5]/n192;
22216 n232 = n58*xF[1]/n188;
22217 n233 = n64*xF[7]/n194;
22218 n234 = n59*xF[2]/n189;
22219 n235 = n57*xF[15]/n187;
22220 n236 = n56*xF[14]/n186;
22222 n238 = -pow(n181, n22)*n76;
22223 n239 = n76*xF[0]/n197;
22224 n240 = pow(n191, n22)*n88*xF[4];
22225 n241 = n88*xF[4]/n207;
22226 n242 = -n122*pow(n192, n22);
22227 n243 = -n91*xF[7]/n210;
22228 n244 = -pow(n188, n22)*n85*xF[1];
22229 n245 = -pow(n194, n22)*n91*xF[7];
22230 n246 = -pow(n195, n22)*n92*xF[8];
22231 n247 = n218*n29*n44*n66;
22232 n248 = n29*n39*n61*xF[4]/n191;
22233 n249 = n29*n41*n63*xF[6]/n193;
22234 n250 = n2*n21*n220*n49*n68;
22235 n251 = n144*n68/n181;
22236 n252 = n142*n216*n68;
22237 n253 = n139*n213*n68;
22238 n254 = n141*n214*n68;
22239 n255 = n138*n217*n68;
22240 n256 = n126*n236*n68;
22241 n257 = n119*n235*n68;
22242 n258 = n123*n232*n68;
22243 n259 = n120*n234*n68;
22244 n260 = n143*n221*n68;
22246 n262 = n111*n231*n68;
22248 n264 = n115*n233*n68;
22249 n265 = n140*n219*n68;
22251 n267 = n144*n215*n68;
22252 n268 = n137/(n145*n149);
22255 n271 = n110*n2*n268 + n110*n2;
22256 n272 = n114*n2 + n147*n179*n2;
22257 n273 = n135 + n147*n172*n2;
22258 n274 = n147*n70/n152 + n54*n70;
22259 n275 = n116*n2 + n147*n167*n2;
22260 n276 = n113*n2 + n147*n170*n2;
22261 n277 = n147*n74/n155 + n57*n74;
22262 n278 = n147*n71/n156 + n58*n71;
22263 n279 = n147*n73/n157 + n59*n73;
22264 n280 = n109*n2 + n147*n168*n2;
22265 n281 = n112*n2 + n147*n165*n2;
22266 n282 = n147*n69/n160 + n62*n69;
22267 n283 = n108*n2 + n147*n169*n2;
22268 n284 = n147*n75/n162 + n64*n75;
22269 n285 = n136 + n147*n171*n2;
22270 n286 = n147*n72/n164 + n66*n72;
22271 n287 = pow(n271, -n0);
22272 n288 = pow(n272, -n0);
22273 n289 = pow(n273, -n0);
22274 n290 = pow(n274, -n0);
22275 n291 = pow(n275, -n0);
22276 n292 = pow(n276, -n0);
22277 n293 = pow(n277, -n0);
22278 n294 = pow(n278, -n0);
22279 n295 = pow(n279, -n0);
22280 n296 = pow(n280, -n0);
22281 n297 = pow(n281, -n0);
22282 n298 = pow(n282, -n0);
22283 n299 = pow(n283, -n0);
22284 n300 = pow(n284, -n0);
22285 n301 = pow(n285, -n0);
22286 n302 = pow(n286, -n0);
22288 n304 = n273*xF[11];
22291 n307 = n0*n147*n2*n21/n149 + n0*n2*n21*n49;
22293 n309 = n121*n268*n98 + n121*n98;
22294 n310 = pow(n184, n22)*n274;
22295 n311 = pow(n196, n22)*n286;
22296 n312 = pow(n185, n22)*n275;
22297 n313 = pow(n186, n22)*n276;
22298 n314 = pow(n187, n22)*n277;
22299 n315 = pow(n193, n22)*n283*xF[6];
22303 n319 = pow(n181, n22)*n309*xF[0];
22304 n320 = n301*n92*xF[8]/n211;
22305 n321 = n289*n80*xF[11]/n199;
22306 n322 = pow(n181, n22)*n303*n68*n76;
22307 n323 = n0*n21*n229*n49*n68*xF[0]*(pow(alpha, n148*n21 + n47)*n1*n137*n2/n145 + n110*n2);
22308 n324 = n114*n224*n46*n68*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2);
22309 n325 = pow(n183, n22)*n46*n53*n6*n68*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135);
22310 n326 = pow(n184, n22)*n46*n54*n68*n7*xF[12]*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70);
22311 n327 = n116*pow(n185, n22)*n46*n68*xF[13]*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2);
22312 n328 = n113*pow(n186, n22)*n46*n68*xF[14]*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2);
22313 n329 = n127*pow(n187, n22)*n46*n68*xF[15]*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74);
22314 n330 = n124*pow(n188, n22)*n46*n68*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71);
22315 n331 = n12*pow(n189, n22)*n46*n59*n68*xF[2]*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73);
22316 n332 = n109*n222*n46*n68*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2);
22317 n333 = n112*pow(n191, n22)*n46*n68*xF[4]*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2);
22318 n334 = n15*pow(n192, n22)*n46*n62*n68*xF[5]*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69);
22319 n335 = n108*pow(n193, n22)*n46*n68*xF[6]*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2);
22320 n336 = n125*pow(n194, n22)*n46*n68*xF[7]*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75);
22321 n337 = n128*pow(n195, n22)*n46*n68*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136);
22322 n338 = n133*pow(n196, n22)*n46*n68*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72);
22323 n339 = 1.0*n110*n229*n303*n68;
22324 n340 = n319*n68*n76;
22326 n342 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n172*pow(n50, n22)*n79 - pow(alpha, n1*n27)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79/n151 + n106*n147*n172 + n139;
22327 n343 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n177*pow(n50, n22)*n79 - pow(alpha, n1*n27)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79/n152 + n106*n147*n177 + n141;
22328 n344 = pow(alpha, n1*n27)*pow(n145, n22)*n167*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79/n153 + n100*n29*n33 + n147*n167*n21*n29;
22329 n345 = pow(alpha, n1*n27)*n126*pow(n145, n22)*pow(n50, n22)*n79/n154 + pow(alpha, n1*n27)*pow(n145, n22)*n170*n21*n29*pow(n50, n22)*n79 + n101*n126 + n147*n170*n21*n29;
22330 n346 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n176*pow(n50, n22)*n79 - pow(alpha, n1*n27)*n119*pow(n145, n22)*pow(n50, n22)*n79/n155 + n106*n147*n176 + n119*n57;
22331 n347 = pow(alpha, n1*n27)*n120*pow(n145, n22)*pow(n50, n22)*n79/n157 + pow(alpha, n1*n27)*pow(n145, n22)*n174*n21*n29*pow(n50, n22)*n79 + n102*n120 + n147*n174*n21*n29;
22332 n348 = pow(alpha, n1*n27)*pow(n145, n22)*n169*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79/n161 + n105*n29*n41 + n147*n169*n21*n29;
22333 n349 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n178*pow(n50, n22)*n79 - pow(alpha, n1*n27)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79/n164 + n106*n147*n178 + n29*n44*n66;
22334 n350 = pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + n100*n29*n33 + n147*n167*n21*n29);
22335 n351 = n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + n101*n126 + n147*n170*n21*n29);
22336 n352 = n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + n102*n120 + n147*n174*n21*n29);
22337 n353 = n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + n103*n29*n39 + n147*n165*n21*n29);
22338 n354 = pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + n105*n29*n41 + n147*n169*n21*n29);
22339 n355 = n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + n106*n147*n179 + n142);
22340 n356 = pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + n106*n147*n172 + n139);
22341 n357 = n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + n106*n147*n177 + n141);
22342 n358 = n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n176 + n119*n57);
22343 n359 = n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n173 + n123*n58);
22344 n360 = n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + n106*n147*n168 + n143);
22345 n361 = n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n180 + n111*n62);
22346 n362 = n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n166 + n115*n64);
22347 n363 = n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + n106*n147*n171 + n140);
22348 n364 = n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + n106*n147*n178 + n29*n44*n66);
22349 n365 = xTj*(n108*n230*n68 + n109*n228*n68 + n110*n2*n220*n68 + n112*n227*n68 + n113*n226*n68 + n114*n2*n216*n68 + n116*n2*n217*n68 - n117*n313*n68 - n118*pow(n189, n22)*n279*n68 + n130*n314*n68 + n131*n310*n68 + n132*n311*n68 + n134*n312*n68 + n135*n213*n68 + n136*n219*n68 + pow(n183, n22)*n304*n68*n97 + n214*n54*n68*n70 + n218*n66*n68*n72 + n222*n280*n68*n94 + n224*n272*n68*n96 + n231*n68*n69 + n232*n68*n71 + n233*n68*n75 + n234*n68*n73 + n235*n68*n74 + n238*n303*n68 - n240*n281*n68 + n242*n282*n68 + n244*n278*n68 + n245*n284*n68 + n246*n285*n68 + n315*n68*n95);
22350 n366 = n250 + n322 + n365;
22351 n367 = n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 + n340 + n350 + n351 + n352 + n353 + n354 + n355 + n356 + n357 + n358 + n359 + n360 + n361 + n362 + n363 + n364;
22352 n368 = -n117*n276*n68*(n113*n46 + n147*n170*n46)/n202 - n118*n279*n68*(n12*n46*n59 + n147*n174*n46)/n205 - n122*n282*n68*(n147*n180*n46 + n15*n46*n62)/n208 + n130*n277*n68*(n127*n46 + n147*n176*n46)/n203 + n131*n274*n68*(n147*n177*n46 + n46*n54*n7)/n200 + n132*n286*n68*(n147*n178*n46 + n19*n46*n66)/n212 + n134*n275*n68*(n116*n46 + n147*n167*n46)/n201 + n223*n283*n68*n95*(n108*n46 + n147*n169*n46) + n225*n272*n68*n96*(n114*n46 + n147*n179*n46) - n237*n305*n68*(n124*n46 + n147*n173*n46) - n239*n271*n307*n68 - n241*n281*n68*(n112*n46 + n147*n165*n46) + n243*n284*n68*(n125*n46 + n147*n166*n46) + n367 - n306*n68*n92*(n128*n46 + n147*n171*n46)/n211 + n280*n68*n94*xF[3]*(n109*n46 + n147*n168*n46)/n206 + n304*n68*n97*(n147*n172*n46 + n46*n53*n6)/n199;
22354 NP_b = -n110*n229*n270*n68*n76 - n250 - n27*(1.0*n110*n229*n68*xF[0]*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2) + 0.5*pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) - 1.0*n239*n287*n68 + n267 - 0.5*xTj*(n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + pow(alpha, -n148*n9 + n47)*n137*n21*n29*n9/n145 + n101*n126) + n117*n22*n316*n68 + n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n12*n148 + n47)*n12*n137*n21*n29/n145 + n102*n120) + n118*n22*n317*n68 + n122*n22*n318*n68 + n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n10*n148 + n47)*n10*n106*n137/n145 + n119*n57) + n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + pow(alpha, -n148*n7 + n47)*n106*n137*n7/n145 + n141) + n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + pow(alpha, -n148*n19 + n47)*n106*n137*n19/n145 + n29*n44*n66) + pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) + pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + pow(alpha, -n148*n6 + n47)*n106*n137*n6/n145 + n139) + pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + pow(alpha, -n148*n8 + n47)*n137*n21*n29*n8/n145 + n100*n29*n33) + pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + pow(alpha, -n148*n16 + n47)*n137*n16*n21*n29/n145 + n105*n29*n41) + n22*n223*n299*n68*n90 + n22*n225*n288*n68*n77 + n22*n237*n308*n68 + n22*n239*n287*n68 + n22*n241*n297*n68 + n22*n320*n68 + n22*n321*n68 + n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + pow(alpha, -n13*n148 + n47)*n106*n13*n137/n145 + n143) + n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + pow(alpha, -n148*n5 + n47)*n106*n137*n5/n145 + n142) + n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + pow(alpha, -n14*n148 + n47)*n137*n14*n21*n29/n145 + n103*n29*n39) + n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n15 + n47)*n106*n137*n15/n145 + n111*n62) + n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n11*n148 + n47)*n106*n11*n137/n145 + n123*n58) + n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n17 + n47)*n106*n137*n17/n145 + n115*n64) + n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + pow(alpha, -n148*n18 + n47)*n106*n137*n18/n145 + n140) + n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 + n22*n302*n68*n93*xF[9]/n212 + n22*n300*n68*n91*xF[7]/n210 + n22*n296*n68*n87*xF[3]/n206 + n22*n293*n68*n84*xF[15]/n203 + n22*n291*n68*n82*xF[13]/n201 + n22*n290*n68*n81*xF[12]/n200)) - n68*xTj*(n108*n230 + n109*n228 + n110*n2*n220 + n112*n227 + n113*n226 + n114*n2*n216 + n116*n2*n217 - n117*n313 - n118*pow(n189, n22)*n279 + n130*n314 + n131*n310 + n132*n311 + n134*n312 + n135*n213 + n136*n219 + pow(n183, n22)*n304*n97 + n214*n54*n70 + n218*n66*n72 + n222*n280*n94 + n224*n272*n96 + n231*n69 + n232*n71 + n233*n75 + n234*n73 + n235*n74 + n238*n303 - n240*n281 + n242*n282 + n244*n278 + n245*n284 + n246*n285 + n315*n95);
22355 NP_2a = -n68*(pow(alpha, n1*n27)*n0*n121*pow(n181, n22)*n270 - pow(alpha, n1*n27)*n0*n121*n239*pow(n269, -n0) + n121*pow(n181, n22)*n76*n98*xF[0]*(-1 + (-n23 + xPj*xTj)/(n145*n149*n50)) - 1.0*n144/n181 + 1.0*xTj*(n0*n21*n229*n49*xF[0]*(pow(alpha, n148*n21 + n47)*n1*n137*n2/n145 + n110*n2) + n108*pow(n193, n22)*n46*xF[6]*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2) + n109*n222*n46*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2) + n111*n231 + n112*pow(n191, n22)*n46*xF[4]*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2) + n113*pow(n186, n22)*n46*xF[14]*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2) + n114*n224*n46*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2) + n115*n233 + n116*pow(n185, n22)*n46*xF[13]*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2) + n117*pow(n186, n22)*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + n101*n126 + n147*n170*n21*n29) + n117*n22*n316 + n118*pow(n189, n22)*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + n102*n120 + n147*n174*n21*n29) + n118*n22*n317 + n119*n235 + n12*pow(n189, n22)*n46*n59*xF[2]*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73) + n120*n234 + n122*n22*n318 + n123*n232 + n124*pow(n188, n22)*n46*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71) + n125*pow(n194, n22)*n46*xF[7]*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75) + n126*n236 + n127*pow(n187, n22)*n46*xF[15]*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74) + n128*pow(n195, n22)*n46*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136) + n130*pow(n187, n22)*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n176 + n119*n57) + n131*pow(n184, n22)*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + n106*n147*n177 + n141) + n132*pow(n196, n22)*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + n106*n147*n178 + n29*n44*n66) + n133*pow(n196, n22)*n46*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72) + n138*n217 + n139*n213 + n140*n219 + n141*n214 + n142*n216 + n143*n221 + n144/n181 + n15*pow(n192, n22)*n46*n62*xF[5]*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69) + pow(n183, n22)*n46*n53*n6*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135) + pow(n183, n22)*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + n106*n147*n172 + n139) + pow(n184, n22)*n46*n54*n7*xF[12]*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70) + pow(n185, n22)*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + n100*n29*n33 + n147*n167*n21*n29) + pow(n193, n22)*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + n105*n29*n41 + n147*n169*n21*n29) + n22*n223*n299*n90 + n22*n225*n288*n77 + n22*n237*n308 + n22*n239*n287 + n22*n241*n297 + n22*n320 + n22*n321 + n222*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + n106*n147*n168 + n143) + n224*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + n106*n147*n179 + n142) + n240*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + n103*n29*n39 + n147*n165*n21*n29) + n242*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n180 + n111*n62) + n244*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n173 + n123*n58) + n245*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n166 + n115*n64) + n246*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + n106*n147*n171 + n140) + n247 + n248 + n249 + n319*n76 + n22*n302*n93*xF[9]/n212 + n22*n300*n91*xF[7]/n210 + n22*n296*n87*xF[3]/n206 + n22*n293*n84*xF[15]/n203 + n22*n291*n82*xF[13]/n201 + n22*n290*n81*xF[12]/n200));
22356 NP_sqrt_base = (-NP0*n366 - n25*(-n117*n68/(n83 - 1 + pow(alpha, -n9*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n118*n68/(n86 - 1 + pow(alpha, -n12*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n122*n68/(n89 - 1 + pow(alpha, -n15*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n76*xF[0]/(pow(alpha, n21*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)) + n76 - 1) - n68*n77*xF[10]/(n77 - 1 + pow(alpha, -n5*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n80*xF[11]/(n80 - 1 + pow(alpha, -n6*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n81*xF[12]/(n81 - 1 + pow(alpha, -n7*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n82*xF[13]/(n82 - 1 + pow(alpha, -n8*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n84*xF[15]/(n84 - 1 + pow(alpha, -n10*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n85*xF[1]/(n85 - 1 + pow(alpha, -n11*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n87*xF[3]/(n87 - 1 + pow(alpha, -n13*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n88*xF[4]/(n88 - 1 + pow(alpha, -n14*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n90*xF[6]/(n90 - 1 + pow(alpha, -n16*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n91*xF[7]/(n91 - 1 + pow(alpha, -n17*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n92*xF[8]/(n92 - 1 + pow(alpha, -n18*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n93*xF[9]/(n93 - 1 + pow(alpha, -n19*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)))) + n68*n76*xF[0]/(-n175 + n76 - 1) - pow(NP0, -n0)*(1.0*n110*n229*n303*n68 - 0.5*n239*n271*n307*n68 + 0.5*n251 + 0.5*n340 - 0.5*n369))*(-n0*n25*(n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + pow(alpha, -n148*n9 + n47)*n137*n21*n29*n9/n145 + n101*n126) - n117*n68*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2)*(pow(alpha, -n148*n9 + n47)*n137*n46*n9/n145 + n113*n46)/n202 + n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n12*n148 + n47)*n12*n137*n21*n29/n145 + n102*n120) - n118*n68*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73)*(pow(alpha, -n12*n148 + n47)*n12*n137*n46/n145 + n12*n46*n59)/n205 - n122*n68*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69)*(pow(alpha, -n148*n15 + n47)*n137*n15*n46/n145 + n15*n46*n62)/n208 + n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n10*n148 + n47)*n10*n106*n137/n145 + n119*n57) + n130*n68*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74)*(pow(alpha, -n10*n148 + n47)*n10*n137*n46/n145 + n127*n46)/n203 + n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + pow(alpha, -n148*n7 + n47)*n106*n137*n7/n145 + n141) + n131*n68*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70)*(pow(alpha, -n148*n7 + n47)*n137*n46*n7/n145 + n46*n54*n7)/n200 + n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + pow(alpha, -n148*n19 + n47)*n106*n137*n19/n145 + n29*n44*n66) + n132*n68*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72)*(pow(alpha, -n148*n19 + n47)*n137*n19*n46/n145 + n19*n46*n66)/n212 + n134*n68*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2)*(pow(alpha, -n148*n8 + n47)*n137*n46*n8/n145 + n116*n46)/n201 + pow(n181, n22)*n68*n76*xF[0]*(pow(alpha, -n1*n148 + n47)*n121*(-n23 + xPj*xTj)/(n145*n50) + n121*n98) + pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + pow(alpha, -n148*n6 + n47)*n106*n137*n6/n145 + n139) + pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + pow(alpha, -n148*n8 + n47)*n137*n21*n29*n8/n145 + n100*n29*n33) + pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + pow(alpha, -n148*n16 + n47)*n137*n16*n21*n29/n145 + n105*n29*n41) + n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + pow(alpha, -n13*n148 + n47)*n106*n13*n137/n145 + n143) + n223*n68*n95*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2)*(pow(alpha, -n148*n16 + n47)*n137*n16*n46/n145 + n108*n46) + n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + pow(alpha, -n148*n5 + n47)*n106*n137*n5/n145 + n142) + n225*n68*n96*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2)*(pow(alpha, -n148*n5 + n47)*n137*n46*n5/n145 + n114*n46) - n237*n68*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71)*(pow(alpha, -n11*n148 + n47)*n11*n137*n46/n145 + n124*n46) - n239*n68*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2)*(pow(alpha, -n1*n148 + n47)*n0*n137*n2*n21/n145 + n0*n2*n21*n49) + n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + pow(alpha, -n14*n148 + n47)*n137*n14*n21*n29/n145 + n103*n29*n39) - n241*n68*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2)*(pow(alpha, -n14*n148 + n47)*n137*n14*n46/n145 + n112*n46) + n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n15 + n47)*n106*n137*n15/n145 + n111*n62) + n243*n68*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75)*(pow(alpha, -n148*n17 + n47)*n137*n17*n46/n145 + n125*n46) + n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n11*n148 + n47)*n106*n11*n137/n145 + n123*n58) + n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n17 + n47)*n106*n137*n17/n145 + n115*n64) + n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + pow(alpha, -n148*n18 + n47)*n106*n137*n18/n145 + n140) + n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 - n68*n92*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136)*(pow(alpha, -n148*n18 + n47)*n137*n18*n46/n145 + n128*n46)/n211 + n68*n94*xF[3]*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2)*(pow(alpha, -n13*n148 + n47)*n13*n137*n46/n145 + n109*n46)/n206 + n68*n97*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135)*(pow(alpha, -n148*n6 + n47)*n137*n46*n6/n145 + n46*n53*n6)/n199) - n0*n251 - n0*n340 + 4.0*n110*n229*n303*n68 - 4.0*n239*n287*n68) + pow(-n27*(1.0*n110*n229*n68*xF[0]*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2) + 0.5*pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) - 0.5*n239*n68*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2)*(pow(alpha, -n1*n148 + n47)*n0*n137*n2*n21/n145 + n0*n2*n21*n49) + n267 - 0.5*xTj*(n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + pow(alpha, -n148*n9 + n47)*n137*n21*n29*n9/n145 + n101*n126) - n117*n68*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2)*(pow(alpha, -n148*n9 + n47)*n137*n46*n9/n145 + n113*n46)/n202 + n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n12*n148 + n47)*n12*n137*n21*n29/n145 + n102*n120) - n118*n68*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73)*(pow(alpha, -n12*n148 + n47)*n12*n137*n46/n145 + n12*n46*n59)/n205 - n122*n68*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69)*(pow(alpha, -n148*n15 + n47)*n137*n15*n46/n145 + n15*n46*n62)/n208 + n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n10*n148 + n47)*n10*n106*n137/n145 + n119*n57) + n130*n68*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74)*(pow(alpha, -n10*n148 + n47)*n10*n137*n46/n145 + n127*n46)/n203 + n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + pow(alpha, -n148*n7 + n47)*n106*n137*n7/n145 + n141) + n131*n68*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70)*(pow(alpha, -n148*n7 + n47)*n137*n46*n7/n145 + n46*n54*n7)/n200 + n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + pow(alpha, -n148*n19 + n47)*n106*n137*n19/n145 + n29*n44*n66) + n132*n68*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72)*(pow(alpha, -n148*n19 + n47)*n137*n19*n46/n145 + n19*n46*n66)/n212 + n134*n68*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2)*(pow(alpha, -n148*n8 + n47)*n137*n46*n8/n145 + n116*n46)/n201 + pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) + pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + pow(alpha, -n148*n6 + n47)*n106*n137*n6/n145 + n139) + pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + pow(alpha, -n148*n8 + n47)*n137*n21*n29*n8/n145 + n100*n29*n33) + pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + pow(alpha, -n148*n16 + n47)*n137*n16*n21*n29/n145 + n105*n29*n41) + n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + pow(alpha, -n13*n148 + n47)*n106*n13*n137/n145 + n143) + n223*n68*n95*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2)*(pow(alpha, -n148*n16 + n47)*n137*n16*n46/n145 + n108*n46) + n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + pow(alpha, -n148*n5 + n47)*n106*n137*n5/n145 + n142) + n225*n68*n96*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2)*(pow(alpha, -n148*n5 + n47)*n137*n46*n5/n145 + n114*n46) - n237*n68*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71)*(pow(alpha, -n11*n148 + n47)*n11*n137*n46/n145 + n124*n46) - n239*n68*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2)*(pow(alpha, -n1*n148 + n47)*n0*n137*n2*n21/n145 + n0*n2*n21*n49) + n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + pow(alpha, -n14*n148 + n47)*n137*n14*n21*n29/n145 + n103*n29*n39) - n241*n68*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2)*(pow(alpha, -n14*n148 + n47)*n137*n14*n46/n145 + n112*n46) + n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n15 + n47)*n106*n137*n15/n145 + n111*n62) + n243*n68*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75)*(pow(alpha, -n148*n17 + n47)*n137*n17*n46/n145 + n125*n46) + n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n11*n148 + n47)*n106*n11*n137/n145 + n123*n58) + n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n17 + n47)*n106*n137*n17/n145 + n115*n64) + n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + pow(alpha, -n148*n18 + n47)*n106*n137*n18/n145 + n140) + n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 - n68*n92*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136)*(pow(alpha, -n148*n18 + n47)*n137*n18*n46/n145 + n128*n46)/n211 + n68*n94*xF[3]*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2)*(pow(alpha, -n13*n148 + n47)*n13*n137*n46/n145 + n109*n46)/n206 + n68*n97*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135)*(pow(alpha, -n148*n6 + n47)*n137*n46*n6/n145 + n46*n53*n6)/n199)) - n366, -n0);
22357 NP_sqrt_base = fabs(NP_sqrt_base);
22358 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
22359 NT1 = n107*(n146 - log(-pow(alpha, NP1*n1)*n137 + 1));
22360 g0 = MW[1] - Mstar;
22361 g1 = MW[0] - Mstar;
22364 g4 = MW[10] - Mstar;
22365 g5 = MW[11] - Mstar;
22366 g6 = MW[12] - Mstar;
22367 g7 = MW[13] - Mstar;
22368 g8 = MW[14] - Mstar;
22369 g9 = MW[15] - Mstar;
22370 g10 = MW[2] - Mstar;
22371 g11 = MW[3] - Mstar;
22372 g12 = MW[4] - Mstar;
22373 g13 = MW[5] - Mstar;
22374 g14 = MW[6] - Mstar;
22375 g15 = MW[7] - Mstar;
22376 g16 = MW[8] - Mstar;
22377 g17 = MW[9] - Mstar;
22382 g22 = pow(alpha, -g1);
22383 g23 = pow(alpha, -g4);
22384 g24 = pow(alpha, -g5);
22385 g25 = pow(alpha, -g6);
22386 g26 = pow(alpha, -g7);
22387 g27 = pow(alpha, -g8);
22388 g28 = pow(alpha, -g9);
22389 g29 = pow(alpha, -g0);
22390 g30 = pow(alpha, -g10);
22391 g31 = pow(alpha, -g11);
22392 g32 = pow(alpha, -g12);
22393 g33 = pow(alpha, -g13);
22394 g34 = pow(alpha, -g14);
22395 g35 = pow(alpha, -g15);
22396 g36 = pow(alpha, -g16);
22397 g37 = pow(alpha, -g17);
22398 g38 = log(xF[0]/xF[1]);
22400 g40 = pow(alpha, NP1*g0);
22401 g41 = pow(alpha, NP1*g1);
22402 g42 = pow(alpha, NP1*g4);
22404 g44 = pow(alpha, NP1*g5);
22405 g45 = pow(alpha, NP1*g6);
22406 g46 = pow(alpha, NP1*g7);
22407 g47 = pow(alpha, NP1*g8);
22408 g48 = pow(alpha, NP1*g9);
22409 g49 = pow(alpha, NP1*g10);
22410 g50 = pow(alpha, NP1*g11);
22411 g51 = pow(alpha, NP1*g12);
22412 g52 = pow(alpha, NP1*g13);
22413 g53 = pow(alpha, NP1*g14);
22414 g54 = pow(alpha, NP1*g15);
22415 g55 = pow(alpha, NP1*g16);
22416 g56 = pow(alpha, NP1*g17);
22454 g94 = g19/(g3*xF[1]);
22455 g95 = pow(alpha, g0*g39) - 1;
22456 g96 = pow(alpha, g0*g39) - 1;
22457 g97 = pow(alpha, g1*g39) - 1;
22458 g98 = pow(alpha, g10*g39) - 1;
22459 g99 = pow(alpha, g11*g39) - 1;
22460 g100 = pow(alpha, g12*g39) - 1;
22461 g101 = pow(alpha, g13*g39) - 1;
22462 g102 = pow(alpha, g14*g39) - 1;
22463 g103 = pow(alpha, g15*g39) - 1;
22464 g104 = pow(alpha, g16*g39) - 1;
22465 g105 = pow(alpha, g17*g39) - 1;
22466 g106 = pow(alpha, g39*g4) - 1;
22467 g107 = pow(alpha, g39*g5) - 1;
22468 g108 = pow(alpha, g39*g6) - 1;
22469 g109 = pow(alpha, g39*g7) - 1;
22470 g110 = pow(alpha, g39*g8) - 1;
22471 g111 = pow(alpha, g39*g9) - 1;
22472 g112 = -pow(alpha, g1*g39);
22473 g113 = -pow(alpha, g39*g4);
22474 g114 = -pow(alpha, g39*g5);
22475 g115 = -pow(alpha, g39*g6);
22476 g116 = -pow(alpha, g39*g7);
22477 g117 = -pow(alpha, g39*g8);
22478 g118 = -pow(alpha, g39*g9);
22479 g119 = -pow(alpha, g10*g39);
22480 g120 = -pow(alpha, g11*g39);
22481 g121 = -pow(alpha, g12*g39);
22482 g122 = -pow(alpha, g13*g39);
22483 g123 = -pow(alpha, g14*g39);
22484 g124 = -pow(alpha, g15*g39);
22485 g125 = -pow(alpha, g16*g39);
22486 g126 = -pow(alpha, g17*g39);
22488 g128 = -g112 - g41;
22489 g129 = -g113 - g42;
22490 g130 = -g114 - g44;
22491 g131 = -g115 - g45;
22492 g132 = -g116 - g46;
22493 g133 = -g117 - g47;
22494 g134 = -g118 - g48;
22495 g135 = -g119 - g49;
22496 g136 = -g120 - g50;
22497 g137 = -g121 - g51;
22498 g138 = -g122 - g52;
22499 g139 = -g123 - g53;
22500 g140 = -g124 - g54;
22501 g141 = -g125 - g55;
22502 g142 = -g126 - g56;
22503 g143 = pow(alpha, g1*g39) + g77;
22505 g145 = pow(alpha, g39*g4) + g78;
22506 g146 = pow(alpha, g39*g5) + g79;
22507 g147 = pow(alpha, g39*g6) + g80;
22508 g148 = pow(alpha, g39*g7) + g81;
22509 g149 = pow(alpha, g39*g8) + g82;
22510 g150 = pow(alpha, g39*g9) + g83;
22511 g151 = pow(alpha, g10*g39) + g84;
22512 g152 = pow(alpha, g11*g39) + g85;
22513 g153 = pow(alpha, g12*g39) + g86;
22514 g154 = pow(alpha, g13*g39) + g87;
22515 g155 = pow(alpha, g14*g39) + g88;
22516 g156 = pow(alpha, g15*g39) + g89;
22517 g157 = pow(alpha, g16*g39) + g90;
22518 g158 = pow(alpha, g17*g39) + g91;
22519 g159 = xF[11]/g146;
22523 g163 = xF[10]/g145;
22524 g164 = xF[15]/g150;
22528 g168 = xF[12]/g147;
22529 g169 = xF[13]/g148;
22531 g171 = xF[14]/g149;
22536 g176 = xF[15]/g134;
22540 g180 = xF[11]/g130;
22542 g182 = xF[13]/g132;
22545 g185 = xF[14]/g133;
22547 g187 = xF[12]/g131;
22548 g188 = xF[10]/g129;
22583 g223 = log(g144*g20*g94/g61);
22584 g224 = log(g127*g20*g94/g60);
22585 g225 = log(g144*g21*g58/g96);
22587 g227 = log(g127*g21*g58/g95);
22589 g229 = -g159*g226*(g79 + 1) - g159*g228*(pow(alpha, g39*g5) - 1) - g160*g226*(g91 + 1) - g160*g228*(pow(alpha, g17*g39) - 1) - g161*g226*(g90 + 1) - g161*g228*(pow(alpha, g16*g39) - 1) - g162*g226*g61 - g162*g228*g96 - g163*g226*(g78 + 1) - g163*g228*(pow(alpha, g39*g4) - 1) - g164*g226*(g83 + 1) - g164*g228*(pow(alpha, g39*g9) - 1) - g165*g226*(g85 + 1) - g165*g228*(pow(alpha, g11*g39) - 1) - g166*g226*(g89 + 1) - g166*g228*(pow(alpha, g15*g39) - 1) - g167*g226*(g86 + 1) - g167*g228*(pow(alpha, g12*g39) - 1) - g168*g226*(g80 + 1) - g168*g228*(pow(alpha, g39*g6) - 1) - g169*g226*(g81 + 1) - g169*g228*(pow(alpha, g39*g7) - 1) - g170*g226*(g88 + 1) - g170*g228*(pow(alpha, g14*g39) - 1) - g171*g226*(g82 + 1) - g171*g228*(pow(alpha, g39*g8) - 1) - g172*g226*(g87 + 1) - g172*g228*(pow(alpha, g13*g39) - 1) - g173*g226*(g84 + 1) - g173*g228*(pow(alpha, g10*g39) - 1) - g174*g226*(g77 + 1) - g174*g228*(pow(alpha, g1*g39) - 1) - g92*xF[0] - g92*xF[10] - g92*xF[11] - g92*xF[12] - g92*xF[13] - g92*xF[14] - g92*xF[15] - g92*xF[1] - g92*xF[2] - g92*xF[3] - g92*xF[4] - g92*xF[5] - g92*xF[6] - g92*xF[7] - g92*xF[8] - g92*xF[9];
22590 LpF = xF[0]*(g22 + 1.0)*(g196*g224 + g207*g227 + g57)/(g43*(g22 - 1.0)) + xF[10]*(g23 + 1.0)*(g205*g224 + g221*g227 + g57)/(g43*(g23 - 1.0)) + xF[11]*(g24 + 1.0)*(g202*g224 + g209*g227 + g57)/(g43*(g24 - 1.0)) + xF[12]*(g25 + 1.0)*(g191*g224 + g218*g227 + g57)/(g43*(g25 - 1.0)) + xF[13]*(g26 + 1.0)*(g199*g224 + g219*g227 + g57)/(g43*(g26 - 1.0)) + xF[14]*(g27 + 1.0)*(g204*g224 + g217*g227 + g57)/(g43*(g27 - 1.0)) + xF[15]*(g28 + 1.0)*(g193*g224 + g208*g227 + g57)/(g43*(g28 - 1.0)) + xF[1]*(g29 + 1.0)*(g201*g224 + g213*g227 + g57)/(g43*(g29 - 1.0)) + xF[2]*(g30 + 1.0)*(g203*g224 + g210*g227 + g57)/(g43*(g30 - 1.0)) + xF[3]*(g31 + 1.0)*(g200*g224 + g211*g227 + g57)/(g43*(g31 - 1.0)) + xF[4]*(g32 + 1.0)*(g194*g224 + g212*g227 + g57)/(g43*(g32 - 1.0)) + xF[5]*(g33 + 1.0)*(g197*g224 + g222*g227 + g57)/(g43*(g33 - 1.0)) + xF[6]*(g34 + 1.0)*(g198*g224 + g216*g227 + g57)/(g43*(g34 - 1.0)) + xF[7]*(g35 + 1.0)*(g195*g224 + g220*g227 + g57)/(g43*(g35 - 1.0)) + xF[8]*(g36 + 1.0)*(g206*g224 + g214*g227 + g57)/(g43*(g36 - 1.0)) + xF[9]*(g37 + 1.0)*(g192*g224 + g215*g227 + g57)/(g43*(g37 - 1.0));
22595 xP[0] = g175*g59*g97;
22596 xP[1] = g181*g59*g95;
22597 xP[2] = g179*g59*g98;
22598 xP[3] = g183*g59*g99;
22599 xP[4] = g100*g177*g59;
22600 xP[5] = g101*g190*g59;
22601 xP[6] = g102*g184*g59;
22602 xP[7] = g103*g178*g59;
22603 xP[8] = g104*g186*g59;
22604 xP[9] = g105*g189*g59;
22605 xP[10] = g106*g188*g59;
22606 xP[11] = g107*g180*g59;
22607 xP[12] = g108*g187*g59;
22608 xP[13] = g109*g182*g59;
22609 xP[14] = g110*g185*g59;
22610 xP[15] = g111*g176*g59;
22611 xT[0] = g175*g62*g93;
22612 xT[1] = g181*g60*g93;
22613 xT[2] = g179*g63*g93;
22614 xT[3] = g183*g64*g93;
22615 xT[4] = g177*g65*g93;
22616 xT[5] = g190*g66*g93;
22617 xT[6] = g184*g67*g93;
22618 xT[7] = g178*g68*g93;
22619 xT[8] = g186*g69*g93;
22620 xT[9] = g189*g70*g93;
22621 xT[10] = g188*g71*g93;
22622 xT[11] = g180*g72*g93;
22623 xT[12] = g187*g73*g93;
22624 xT[13] = g182*g74*g93;
22625 xT[14] = g185*g75*g93;
22626 xT[15] = g176*g76*g93;
22629 n0 = MW[0] - Mstar;
22633 n4 = MW[10] - Mstar;
22634 n5 = MW[11] - Mstar;
22635 n6 = MW[12] - Mstar;
22636 n7 = MW[13] - Mstar;
22637 n8 = MW[14] - Mstar;
22638 n9 = MW[15] - Mstar;
22639 n10 = MW[16] - Mstar;
22640 n11 = MW[1] - Mstar;
22641 n12 = MW[2] - Mstar;
22642 n13 = MW[3] - Mstar;
22643 n14 = MW[4] - Mstar;
22644 n15 = MW[5] - Mstar;
22645 n16 = MW[6] - Mstar;
22646 n17 = MW[7] - Mstar;
22647 n18 = MW[8] - Mstar;
22648 n19 = MW[9] - Mstar;
22658 n29 = pow(n0, -n21);
22659 n30 = pow(n1, -n21);
22660 n31 = pow(n4, -n21);
22661 n32 = pow(n5, -n21);
22662 n33 = pow(n6, -n21);
22663 n34 = pow(n7, -n21);
22664 n35 = pow(n8, -n21);
22665 n36 = pow(n9, -n21);
22666 n37 = pow(n10, -n21);
22667 n38 = pow(n11, -n21);
22668 n39 = pow(n12, -n21);
22669 n40 = pow(n13, -n21);
22670 n41 = pow(n14, -n21);
22671 n42 = pow(n15, -n21);
22672 n43 = pow(n16, -n21);
22673 n44 = pow(n17, -n21);
22674 n45 = pow(n18, -n21);
22675 n46 = pow(n19, -n21);
22679 n50 = pow(alpha, NP0*n0);
22680 n51 = n23 + n26*xF[0];
22681 n52 = n23 + n26*xPj;
22682 n53 = pow(alpha, NP0*n4);
22683 n54 = pow(alpha, NP0*n5);
22684 n55 = pow(alpha, NP0*n6);
22685 n56 = pow(alpha, NP0*n7);
22686 n57 = pow(alpha, NP0*n8);
22687 n58 = pow(alpha, NP0*n9);
22688 n59 = pow(alpha, NP0*n10);
22689 n60 = pow(alpha, NP0*n11);
22690 n61 = pow(alpha, NP0*n12);
22691 n62 = pow(alpha, NP0*n13);
22692 n63 = pow(alpha, NP0*n14);
22693 n64 = pow(alpha, NP0*n15);
22694 n65 = pow(alpha, NP0*n16);
22695 n66 = pow(alpha, NP0*n17);
22696 n67 = pow(alpha, NP0*n18);
22697 n68 = pow(alpha, NP0*n19);
22712 n83 = pow(alpha, NP0*n21*n22);
22713 n84 = pow(n51, -n21);
22714 n85 = pow(n52, -n21);
22777 n148 = log((-1.0 + xPj/xF[0])/n2);
22796 n167 = n1*n11*n117;
22797 n168 = n153*xF[13];
22799 n170 = n30*n34*n56;
22800 n171 = n30*n32*n54;
22801 n172 = n30*n45*n67;
22802 n173 = n30*n37*n59;
22803 n174 = n30*n31*n53;
22804 n175 = n30*n43*n65;
22805 n176 = n30*n40*n62;
22806 n177 = n102*n166 + 1;
22807 n178 = -n166*n50 + 1;
22808 n179 = pow(n177, -n21);
22809 n180 = n148 + n20 + n47 + n69;
22814 n185 = n166*n50/n177;
22816 n187 = n116*(n180 - log(n177)) + 1;
22817 n188 = n116*(n180 - log(n178)) + 1;
22818 n189 = pow(alpha, n0*n187);
22819 n190 = pow(alpha, n187*n4);
22820 n191 = pow(alpha, n187*n5);
22821 n192 = pow(alpha, n187*n6);
22822 n193 = pow(alpha, n187*n7);
22823 n194 = pow(alpha, n187*n8);
22824 n195 = pow(alpha, n187*n9);
22825 n196 = pow(alpha, n10*n187);
22826 n197 = pow(alpha, n11*n187);
22827 n198 = pow(alpha, n12*n187);
22828 n199 = pow(alpha, n13*n187);
22829 n200 = pow(alpha, n14*n187);
22830 n201 = pow(alpha, n15*n187);
22831 n202 = pow(alpha, n16*n187);
22832 n203 = pow(alpha, n17*n187);
22833 n204 = pow(alpha, n18*n187);
22834 n205 = pow(alpha, n187*n19);
22863 n234 = pow(alpha, n187*n22) + n81 - 1;
22864 n235 = n82 - 1 + 1.0/n190;
22865 n236 = n86 - 1 + 1.0/n191;
22866 n237 = n87 - 1 + 1.0/n192;
22867 n238 = n88 - 1 + 1.0/n193;
22868 n239 = n89 - 1 + 1.0/n194;
22869 n240 = n90 - 1 + 1.0/n195;
22870 n241 = n91 - 1 + 1.0/n196;
22871 n242 = n92 - 1 + 1.0/n197;
22872 n243 = n93 - 1 + 1.0/n198;
22873 n244 = n94 - 1 + 1.0/n199;
22874 n245 = n95 - 1 + 1.0/n200;
22875 n246 = n96 - 1 + 1.0/n201;
22876 n247 = n97 - 1 + 1.0/n202;
22877 n248 = n98 - 1 + 1.0/n203;
22878 n249 = n99 - 1 + 1.0/n204;
22879 n250 = n100 - 1 + 1.0/n205;
22880 n251 = -n224 + n81 - 1;
22881 n252 = -n210 + n82 - 1;
22882 n253 = -n216 + n86 - 1;
22883 n254 = -n208 + n87 - 1;
22884 n255 = -n206 + n88 - 1;
22886 n257 = -n213 + n90 - 1;
22887 n258 = -n215 + n91 - 1;
22888 n259 = -n229 + n92 - 1;
22890 n261 = -n223 + n94 - 1;
22892 n263 = -n219 + n96 - 1;
22893 n264 = -n209 + n97 - 1;
22894 n265 = -n232 + n98 - 1;
22895 n266 = -n227 + n99 - 1;
22896 n267 = n100 - n221 - 1;
22897 n268 = pow(n234, -n21);
22898 n269 = pow(n235, -n21);
22899 n270 = pow(n236, -n21);
22900 n271 = pow(n237, -n21);
22901 n272 = pow(n238, -n21);
22902 n273 = pow(n239, -n21);
22903 n274 = pow(n240, -n21);
22904 n275 = pow(n241, -n21);
22905 n276 = pow(n242, -n21);
22906 n277 = pow(n243, -n21);
22907 n278 = pow(n244, -n21);
22908 n279 = pow(n245, -n21);
22909 n280 = pow(n246, -n21);
22910 n281 = pow(n247, -n21);
22911 n282 = pow(n248, -n21);
22912 n283 = pow(n249, -n21);
22913 n284 = pow(n250, -n21);
22914 n285 = pow(n234, 3);
22915 n286 = pow(n235, 3);
22916 n287 = pow(n236, 3);
22917 n288 = pow(n237, 3);
22918 n289 = pow(n238, 3);
22919 n290 = pow(n239, 3);
22920 n291 = pow(n240, 3);
22921 n292 = pow(n241, 3);
22922 n293 = pow(n242, 3);
22923 n294 = pow(n243, 3);
22924 n295 = pow(n244, 3);
22925 n296 = pow(n245, 3);
22926 n297 = pow(n246, 3);
22927 n298 = pow(n247, 3);
22928 n299 = pow(n248, 3);
22929 n300 = pow(n249, 3);
22930 n301 = pow(n250, 3);
22931 n302 = pow(n251, -n21);
22932 n303 = xF[11]/n236;
22934 n305 = xF[10]/n235;
22935 n306 = xF[13]/n238;
22937 n308 = xF[16]/n241;
22941 n312 = xF[10]/n269;
22945 n316 = n64*xF[5]/n246;
22948 n319 = n57*xF[14]/n239;
22949 n320 = n30*n44/n248;
22955 n326 = n98*xF[7]/n299;
22957 n328 = n95*xF[4]/n279;
22958 n329 = n98*xF[7]/n282;
22959 n330 = n99*xF[8]/n283;
22960 n331 = 1/(n177*n189);
22961 n332 = n115*n30*n46/n250;
22962 n333 = n30*n41*n63*xF[4]/n245;
22963 n334 = n1*n22*n304*n50*n70;
22964 n335 = n169*n304*n70;
22965 n336 = n174*n305*n70;
22966 n337 = n171*n303*n70;
22967 n338 = n112*n142*n70/n237;
22968 n339 = n170*n306*n70;
22969 n340 = n145*n319*n70;
22970 n341 = n136*n318*n70;
22971 n342 = n173*n308*n70;
22972 n343 = n117*n139*n70/n242;
22973 n344 = n137*n317*n70;
22974 n345 = n176*n310*n70;
22976 n347 = n125*n316*n70;
22977 n348 = n175*n309*n70;
22978 n349 = n113*n320*n70;
22979 n350 = n172*n307*n70;
22982 n353 = n166*n331 + 1;
22983 n354 = n149*n166*n331 + n149;
22984 n355 = n1*n185*n228 + n150;
22985 n356 = n151 + n185*n73/n191;
22986 n357 = n152 + n185*n71/n192;
22987 n358 = n153 + n185*n79/n193;
22988 n359 = n1*n185*n212 + n154;
22989 n360 = n155 + n185*n78/n195;
22990 n361 = n1*n185*n233 + n156;
22991 n362 = n1*n185*n220 + n157;
22992 n363 = n158 + n185*n76/n198;
22993 n364 = n1*n185*n211 + n159;
22994 n365 = n160 + n185*n75/n200;
22995 n366 = n161 + n185*n72/n201;
22996 n367 = n162 + n185*n77/n202;
22997 n368 = n163 + n185*n80/n203;
22998 n369 = n1*n185*n214 + n164;
22999 n370 = n165 + n185*n74/n205;
23000 n371 = pow(n354, -n21);
23001 n372 = pow(n355, -n21);
23002 n373 = pow(n356, -n21);
23003 n374 = pow(n357, -n21);
23004 n375 = pow(n358, -n21);
23005 n376 = pow(n359, -n21);
23006 n377 = pow(n360, -n21);
23007 n378 = pow(n361, -n21);
23008 n379 = pow(n362, -n21);
23009 n380 = pow(n363, -n21);
23010 n381 = pow(n364, -n21);
23011 n382 = pow(n365, -n21);
23012 n383 = pow(n366, -n21);
23013 n384 = pow(n367, -n21);
23014 n385 = pow(n368, -n21);
23015 n386 = pow(n369, -n21);
23016 n387 = pow(n370, -n21);
23017 n388 = pow(alpha, n188*n22)*n149*n184 + n149;
23019 n390 = n356*xF[11];
23022 n393 = n1*n185*n21*n22/n189 + n1*n21*n22*n50;
23023 n394 = n373*xF[11];
23025 n396 = n102*n144*n166*n331 + n102*n144;
23046 n417 = n381*n94*xF[3]/n295;
23047 n418 = n386*n99*xF[8]/n300;
23048 n419 = n147*n371/n285;
23049 n420 = n372*n82*xF[10]/n286;
23050 n421 = n135*n388/n302;
23051 n422 = n21*n22*n314*n50*n70*xF[0]*(pow(alpha, NP0*n0 + n187*n22)*n0*n1*n166/n177 + n149);
23052 n423 = n129*n312*n48*n70*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150);
23053 n424 = n48*n5*n54*n70*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)/n270;
23054 n425 = n112*n48*n6*n70*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)/n271;
23055 n426 = n143*n48*n70*xF[13]*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)/n272;
23056 n427 = n128*n48*n70*xF[14]*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)/n273;
23057 n428 = n118*n48*n70*n9*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)/n274;
23058 n429 = n138*n48*n70*xF[16]*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)/n275;
23059 n430 = n11*n117*n48*n70*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)/n276;
23060 n431 = n119*n12*n48*n70*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)/n277;
23061 n432 = n121*n311*n48*n70*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159);
23062 n433 = n126*n48*n70*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)/n279;
23063 n434 = n15*n48*n64*n70*xF[5]*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)/n280;
23064 n435 = n16*n48*n65*n70*xF[6]*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)/n281;
23065 n436 = n113*n17*n48*n70*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)/n282;
23066 n437 = n146*n48*n70*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)/n283;
23067 n438 = n115*n19*n48*n70*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)/n284;
23068 n439 = 1.0*n149*n389*n70/n268;
23069 n440 = n147*n396*n70/n268;
23071 n442 = pow(alpha, n0*n25)*n114*n228*n85/(n179*n84) + pow(alpha, n0*n25)*n210*n30*n31*n85/(n179*n84) + n114*n185*n228 + n174;
23072 n443 = pow(alpha, n0*n25)*n114*n217*n85/(n179*n84) + pow(alpha, n0*n25)*n216*n30*n32*n85/(n179*n84) + n114*n185*n217 + n171;
23073 n444 = pow(alpha, n0*n25)*n114*n226*n85/(n179*n84) + pow(alpha, n0*n25)*n142*n208*n85/(n179*n84) + n114*n185*n226 + n142*n55;
23074 n445 = pow(alpha, n0*n25)*n22*n30*n7*n85/(n179*n193*n84) + pow(alpha, n0*n25)*n30*n34*n85/(n179*n193*n84) + n104*n30*n34 + n185*n22*n30*n7/n193;
23075 n446 = pow(alpha, n0*n25)*n145*n85/(n179*n194*n84) + pow(alpha, n0*n25)*n212*n22*n30*n85/(n179*n84) + n105*n145 + n185*n212*n22*n30;
23076 n447 = pow(alpha, n0*n25)*n114*n225*n85/(n179*n84) + pow(alpha, n0*n25)*n136*n213*n85/(n179*n84) + n114*n185*n225 + n136*n58;
23077 n448 = pow(alpha, n0*n25)*n22*n233*n30*n85/(n179*n84) + pow(alpha, n0*n25)*n30*n37*n85/(n179*n196*n84) + n106*n30*n37 + n185*n22*n233*n30;
23078 n449 = pow(alpha, n0*n25)*n137*n85/(n179*n198*n84) + pow(alpha, n0*n25)*n22*n222*n30*n85/(n179*n84) + n107*n137 + n185*n22*n222*n30;
23079 n450 = pow(alpha, n0*n25)*n114*n211*n85/(n179*n84) + pow(alpha, n0*n25)*n223*n30*n40*n85/(n179*n84) + n114*n185*n211 + n176;
23080 n451 = pow(alpha, n0*n25)*n16*n22*n30*n85/(n179*n202*n84) + pow(alpha, n0*n25)*n30*n43*n85/(n179*n202*n84) + n110*n30*n43 + n16*n185*n22*n30/n202;
23081 n452 = pow(alpha, n0*n25)*n114*n231*n85/(n179*n84) + pow(alpha, n0*n25)*n221*n30*n46*n85/(n179*n84) + n114*n185*n231 + n30*n46*n68;
23082 n453 = n134*n70*(pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34 + n185*n22*n30*n7/n193)/n272;
23083 n454 = n131*n70*(pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145 + n185*n212*n22*n30)/n273;
23084 n455 = n120*n70*(pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37 + n185*n22*n233*n30)/n275;
23085 n456 = n132*n70*(pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137 + n185*n22*n222*n30)/n277;
23086 n457 = n328*n70*(pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41 + n185*n218*n22*n30);
23087 n458 = n130*n70*(pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43 + n16*n185*n22*n30/n202)/n281;
23088 n459 = n111*n312*n82*(pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n114*n185*n228 + n174);
23089 n460 = n111*n322*xF[11]*(pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n114*n185*n217 + n171);
23090 n461 = n111*n123*(pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n114*n185*n226 + n142*n55)/n271;
23091 n462 = n111*n122*(pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n114*n185*n225 + n136*n58)/n274;
23092 n463 = n111*n327*(pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n114*n185*n220 + n139*n60);
23093 n464 = n111*n311*n94*(pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n114*n185*n211 + n176);
23094 n465 = n111*n325*(pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n114*n185*n230 + n125*n64);
23095 n466 = n111*n329*(pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n114*n185*n207 + n30*n44*n66);
23096 n467 = n111*n330*(pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n114*n185*n214 + n172);
23097 n468 = n111*n127*(pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n114*n185*n231 + n30*n46*n68)/n284;
23098 n469 = n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438 + n440 + n453 + n454 + n455 + n456 + n457 + n458 + n459 + n460 + n461 + n462 + n463 + n464 + n465 + n466 + n467 + n468;
23099 n470 = n111*n120*n361*(n138*n48 + n185*n233*n48)/n292 + n111*n122*n360*(n185*n225*n48 + n48*n58*n9)/n291 + n111*n123*n357*(n185*n226*n48 + n48*n55*n6)/n288 + n111*n127*n370*(n185*n231*n48 + n19*n48*n68)/n301 + n111*n130*n367*(n16*n185*n48/n202 + n16*n48*n65)/n298 + n111*n131*n359*(n128*n48 + n185*n212*n48)/n290 + n111*n132*n363*(n12*n48*n61 + n185*n222*n48)/n294 + n111*n133*n366*(n15*n48*n64 + n185*n230*n48)/n297 + n111*n134*n358*(n143*n48 + n185*n48*n7/n193)/n289 + n111*n140*n362*(n141*n48 + n185*n220*n48)/n293 + n111*n147*n354*n416 + n111*n321*n390*(n185*n217*n48 + n48*n5*n54) + n111*n323*n391*(n126*n48 + n185*n218*n48) + n111*n326*n368*(n17*n48*n66 + n185*n207*n48) + n111*n392*n99*(n146*n48 + n185*n214*n48)/n300 + n111*n397*xF[3]*(n121*n48 + n185*n211*n48)/n295 + n111*n398*xF[10]*(n129*n48 + n185*n228*n48)/n286 + n469;
23101 NP_b = -n147*n149*n353*n70/n268 - n25*(0.5*n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + 1.0*n149*n70*xF[0]*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)/n268 + n352 - 1.0*n419*n70 - 0.5*xTj*(n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n114*n166*n9/n177 + pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n136*n58)/n274 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n114*n166*n6/n177 + pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n142*n55)/n271 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n114*n166*n19/n177 + pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n30*n46*n68)/n284 + n111*n311*n94*(pow(alpha, NP0*n0 - n13*n187)*n114*n13*n166/n177 + pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n176) + n111*n312*n82*(pow(alpha, NP0*n0 - n187*n4)*n114*n166*n4/n177 + pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n174) + n111*n322*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n114*n166*n5/n177 + pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n171) + n111*n325*(pow(alpha, NP0*n0 - n15*n187)*n114*n15*n166/n177 + pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n125*n64) + n111*n327*(pow(alpha, NP0*n0 - n11*n187)*n11*n114*n166/n177 + pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n139*n60) + n111*n329*(pow(alpha, NP0*n0 - n17*n187)*n114*n166*n17/n177 + pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n30*n44*n66) + n111*n330*(pow(alpha, NP0*n0 - n18*n187)*n114*n166*n18/n177 + pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n172) + n120*n21*n414*n70 + n120*n70*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n22*n30/n177 + pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37)/n275 + n122*n21*n408*n70 + n123*n21*n412*n70 + n127*n21*n406*n70 + n130*n21*n407*n70 + n130*n70*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n22*n30/n177 + pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43)/n281 + n131*n21*n410*n70 + n131*n70*(pow(alpha, NP0*n0 - n187*n8)*n166*n22*n30*n8/n177 + pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145)/n273 + n132*n21*n411*n70 + n132*n70*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n22*n30/n177 + pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137)/n277 + n133*n21*n413*n70 + n134*n21*n409*n70 + n134*n70*(pow(alpha, NP0*n0 - n187*n7)*n166*n22*n30*n7/n177 + pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34)/n272 + n140*n21*n415*n70 + n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + n21*n321*n394*n70 + n21*n323*n395*n70 + n21*n326*n385*n70 + n21*n417*n70 + n21*n418*n70 + n21*n419*n70 + n21*n420*n70 + n328*n70*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n22*n30/n177 + pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41) + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438)) - n334 - n70*xTj*(n112*n71/n237 + n113*n80/n248 + n115*n74/n250 - n120*n405 - n122*n404 - n123*n399 + n126*n49/n245 - n127*n401 - n130*n367/n281 - n131*n403 - n132*n400 - n134*n402 - n147*n354/n268 + n149*n304 + n150*n305 + n151*n303 + n154*xF[14]/n239 + n156*n308 + n159*n310 + n161*xF[5]/n246 + n162*n309 + n164*n307 + n167/n242 + n168/n238 - n311*n397 - n312*n398 + n317*n76 + n318*n78 - n322*n390 - n325*n366 - n327*n362 - n328*n365 - n329*n368 - n330*n369);
23102 NP_2a = -n70*(-pow(alpha, n0*n25)*n144*n147*n21*pow(n353, -n21)/n285 - 2.0*pow(alpha, n0*n25)*n144*n353*xF[0]/n268 + n102*n144*n147*(n331*(-n23 + xPj*xTj)/n51 - 1)/n268 - 1.0*n169*n304 + 1.0*xTj*(n11*n117*n48*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)/n276 + n112*n142/n237 + n112*n48*n6*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)/n271 + n113*n17*n48*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)/n282 + n113*n320 + n115*n19*n48*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)/n284 + n117*n139/n242 + n118*n48*n9*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)/n274 + n119*n12*n48*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)/n277 + n120*n21*n414 + n120*(pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37 + n185*n22*n233*n30)/n275 + n121*n311*n48*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159) + n122*n21*n408 - n122*(pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n114*n185*n225 + n136*n58)/n274 + n123*n21*n412 - n123*(pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n114*n185*n226 + n142*n55)/n271 + n125*n316 + n126*n48*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)/n279 + n127*n21*n406 - n127*(pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n114*n185*n231 + n30*n46*n68)/n284 + n128*n48*xF[14]*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)/n273 + n129*n312*n48*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150) + n130*n21*n407 + n130*(pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43 + n16*n185*n22*n30/n202)/n281 + n131*n21*n410 + n131*(pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145 + n185*n212*n22*n30)/n273 + n132*n21*n411 + n132*(pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137 + n185*n22*n222*n30)/n277 + n133*n21*n413 + n134*n21*n409 + n134*(pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34 + n185*n22*n30*n7/n193)/n272 + n136*n318 + n137*n317 + n138*n48*xF[16]*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)/n275 + n140*n21*n415 + n143*n48*xF[13]*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)/n272 + n145*n319 + n146*n48*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)/n283 + n147*n396/n268 + n15*n48*n64*xF[5]*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)/n280 + n16*n48*n65*xF[6]*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)/n281 + n169*n304 + n170*n306 + n171*n303 + n172*n307 + n173*n308 + n174*n305 + n175*n309 + n176*n310 + n21*n22*n314*n50*xF[0]*(pow(alpha, NP0*n0 + n187*n22)*n0*n1*n166/n177 + n149) + n21*n321*n394 + n21*n323*n395 + n21*n326*n385 + n21*n417 + n21*n418 + n21*n419 + n21*n420 - n311*n94*(pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n114*n185*n211 + n176) - n312*n82*(pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n114*n185*n228 + n174) - n322*xF[11]*(pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n114*n185*n217 + n171) - n325*(pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n114*n185*n230 + n125*n64) - n327*(pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n114*n185*n220 + n139*n60) + n328*(pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41 + n185*n218*n22*n30) - n329*(pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n114*n185*n207 + n30*n44*n66) - n330*(pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n114*n185*n214 + n172) + n332 + n333 + n48*n5*n54*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)/n270));
23103 NP_sqrt_base = (-NP0*(n22*n315*n50*n70 + n421*n70 + xTj*(n100*n111*pow(n267, n21)*xF[9]*(n165 + pow(alpha, -n188*n19)*n186*n74) + n111*pow(n252, n21)*n82*xF[10]*(n150 + pow(alpha, -n188*n4)*n166*n183*n4) + n111*pow(n253, n21)*n86*xF[11]*(n151 + pow(alpha, -n188*n5)*n186*n73) + n111*pow(n254, n21)*n87*xF[12]*(n152 + pow(alpha, -n188*n6)*n186*n71) + n111*pow(n255, n21)*n88*xF[13]*(n153 + pow(alpha, -n188*n7)*n186*n79) + n111*pow(n256, n21)*n89*xF[14]*(n154 + pow(alpha, -n188*n8)*n166*n183*n8) + n111*pow(n257, n21)*n90*xF[15]*(n155 + pow(alpha, -n188*n9)*n186*n78) + n111*pow(n258, n21)*n91*xF[16]*(n156 + pow(alpha, -n10*n188)*n10*n166*n183) + n111*pow(n259, n21)*n92*xF[1]*(n157 + pow(alpha, -n11*n188)*n11*n166*n183) + n111*pow(n260, n21)*n93*xF[2]*(n158 + pow(alpha, -n12*n188)*n186*n76) + n111*pow(n261, n21)*n94*xF[3]*(n159 + pow(alpha, -n13*n188)*n13*n166*n183) + n111*pow(n262, n21)*n95*xF[4]*(n160 + pow(alpha, -n14*n188)*n186*n75) + n111*pow(n263, n21)*n96*xF[5]*(n161 + pow(alpha, -n15*n188)*n186*n72) + n111*pow(n264, n21)*n97*xF[6]*(n162 + pow(alpha, -n16*n188)*n186*n77) + n111*pow(n265, n21)*n98*xF[7]*(n163 + pow(alpha, -n17*n188)*n186*n80) + n111*pow(n266, n21)*n99*xF[8]*(n164 + pow(alpha, -n18*n188)*n166*n18*n183) + n111*n421 + n112*n70*n71/n254 + n113*n70*n80/n265 + n115*n70*n74/n267 + n118*n70*n78/n257 + n119*n70*n76/n260 + n126*n49*n70/n262 + n149*n313*n70 + n150*n70*xF[10]/n252 + n151*n70*xF[11]/n253 + n154*n70*xF[14]/n256 + n156*n70*xF[16]/n258 + n159*n70*xF[3]/n261 + n161*n70*xF[5]/n263 + n162*n70*xF[6]/n264 + n164*n70*xF[8]/n266 + n167*n70/n259 + n168*n70/n255)) - n111*n135/n251 - n26*(-n120*n70/(n91 - 1 + pow(alpha, -n10*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n122*n70/(n90 - 1 + pow(alpha, -n9*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n123*n70/(n87 - 1 + pow(alpha, -n6*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n127*n70/(n100 - 1 + pow(alpha, -n19*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n130*n70/(n97 - 1 + pow(alpha, -n16*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n131*n70/(n89 - 1 + pow(alpha, -n8*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n132*n70/(n93 - 1 + pow(alpha, -n12*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n133*n70/(n96 - 1 + pow(alpha, -n15*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n134*n70/(n88 - 1 + pow(alpha, -n7*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n140*n70/(n92 - 1 + pow(alpha, -n11*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n147*n70/(pow(alpha, n22*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)) + n81 - 1) - n70*n82*xF[10]/(n82 - 1 + pow(alpha, -n4*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n86*xF[11]/(n86 - 1 + pow(alpha, -n5*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n94*xF[3]/(n94 - 1 + pow(alpha, -n13*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n95*xF[4]/(n95 - 1 + pow(alpha, -n14*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n98*xF[7]/(n98 - 1 + pow(alpha, -n17*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n99*xF[8]/(n99 - 1 + pow(alpha, -n18*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)))) - pow(NP0, -n21)*(-0.5*n147*n354*n416*n70 + 1.0*n149*n389*n70/n268 + 0.5*n335 + 0.5*n440 - 0.5*n471))*(4.0*n149*n389*n70/n268 - n21*n26*(n111*n120*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n48/n177 + n138*n48)/n292 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)*(pow(alpha, NP0*n0 - n187*n9)*n166*n48*n9/n177 + n48*n58*n9)/n291 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n114*n166*n9/n177 + pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n136*n58)/n274 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)*(pow(alpha, NP0*n0 - n187*n6)*n166*n48*n6/n177 + n48*n55*n6)/n288 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n114*n166*n6/n177 + pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n142*n55)/n271 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)*(pow(alpha, NP0*n0 - n187*n19)*n166*n19*n48/n177 + n19*n48*n68)/n301 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n114*n166*n19/n177 + pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n30*n46*n68)/n284 + n111*n130*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n48/n177 + n16*n48*n65)/n298 + n111*n131*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)*(pow(alpha, NP0*n0 - n187*n8)*n166*n48*n8/n177 + n128*n48)/n290 + n111*n132*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n48/n177 + n12*n48*n61)/n294 + n111*n133*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)*(pow(alpha, NP0*n0 - n15*n187)*n15*n166*n48/n177 + n15*n48*n64)/n297 + n111*n134*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)*(pow(alpha, NP0*n0 - n187*n7)*n166*n48*n7/n177 + n143*n48)/n289 + n111*n140*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)*(pow(alpha, NP0*n0 - n11*n187)*n11*n166*n48/n177 + n141*n48)/n293 + n111*n147*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)*(pow(alpha, NP0*n0 - n0*n187)*n1*n166*n21*n22/n177 + n1*n21*n22*n50)/n285 + n111*n311*n94*(pow(alpha, NP0*n0 - n13*n187)*n114*n13*n166/n177 + pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n176) + n111*n312*n82*(pow(alpha, NP0*n0 - n187*n4)*n114*n166*n4/n177 + pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n174) + n111*n321*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)*(pow(alpha, NP0*n0 - n187*n5)*n166*n48*n5/n177 + n48*n5*n54) + n111*n322*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n114*n166*n5/n177 + pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n171) + n111*n323*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n48/n177 + n126*n48) + n111*n325*(pow(alpha, NP0*n0 - n15*n187)*n114*n15*n166/n177 + pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n125*n64) + n111*n326*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)*(pow(alpha, NP0*n0 - n17*n187)*n166*n17*n48/n177 + n17*n48*n66) + n111*n327*(pow(alpha, NP0*n0 - n11*n187)*n11*n114*n166/n177 + pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n139*n60) + n111*n329*(pow(alpha, NP0*n0 - n17*n187)*n114*n166*n17/n177 + pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n30*n44*n66) + n111*n330*(pow(alpha, NP0*n0 - n18*n187)*n114*n166*n18/n177 + pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n172) + n111*n99*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)*(pow(alpha, NP0*n0 - n18*n187)*n166*n18*n48/n177 + n146*n48)/n300 + n111*n94*xF[3]*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159)*(pow(alpha, NP0*n0 - n13*n187)*n13*n166*n48/n177 + n121*n48)/n295 + n111*n82*xF[10]*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150)*(pow(alpha, NP0*n0 - n187*n4)*n166*n4*n48/n177 + n129*n48)/n286 + n120*n70*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n22*n30/n177 + pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37)/n275 + n130*n70*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n22*n30/n177 + pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43)/n281 + n131*n70*(pow(alpha, NP0*n0 - n187*n8)*n166*n22*n30*n8/n177 + pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145)/n273 + n132*n70*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n22*n30/n177 + pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137)/n277 + n134*n70*(pow(alpha, NP0*n0 - n187*n7)*n166*n22*n30*n7/n177 + pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34)/n272 + n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + n328*n70*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n22*n30/n177 + pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41) + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438) + 2.0*n335 - 4.0*n419*n70 + 2.0*n440) + pow(-n147*n354*n70/n268 - n25*(-0.5*n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)*(pow(alpha, NP0*n0 - n0*n187)*n1*n166*n21*n22/n177 + n1*n21*n22*n50)/n285 + 0.5*n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + 1.0*n149*n70*xF[0]*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)/n268 + n352 - 0.5*xTj*(n111*n120*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n48/n177 + n138*n48)/n292 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)*(pow(alpha, NP0*n0 - n187*n9)*n166*n48*n9/n177 + n48*n58*n9)/n291 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n114*n166*n9/n177 + pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n136*n58)/n274 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)*(pow(alpha, NP0*n0 - n187*n6)*n166*n48*n6/n177 + n48*n55*n6)/n288 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n114*n166*n6/n177 + pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n142*n55)/n271 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)*(pow(alpha, NP0*n0 - n187*n19)*n166*n19*n48/n177 + n19*n48*n68)/n301 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n114*n166*n19/n177 + pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n30*n46*n68)/n284 + n111*n130*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n48/n177 + n16*n48*n65)/n298 + n111*n131*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)*(pow(alpha, NP0*n0 - n187*n8)*n166*n48*n8/n177 + n128*n48)/n290 + n111*n132*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n48/n177 + n12*n48*n61)/n294 + n111*n133*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)*(pow(alpha, NP0*n0 - n15*n187)*n15*n166*n48/n177 + n15*n48*n64)/n297 + n111*n134*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)*(pow(alpha, NP0*n0 - n187*n7)*n166*n48*n7/n177 + n143*n48)/n289 + n111*n140*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)*(pow(alpha, NP0*n0 - n11*n187)*n11*n166*n48/n177 + n141*n48)/n293 + n111*n147*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)*(pow(alpha, NP0*n0 - n0*n187)*n1*n166*n21*n22/n177 + n1*n21*n22*n50)/n285 + n111*n311*n94*(pow(alpha, NP0*n0 - n13*n187)*n114*n13*n166/n177 + pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n176) + n111*n312*n82*(pow(alpha, NP0*n0 - n187*n4)*n114*n166*n4/n177 + pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n174) + n111*n321*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)*(pow(alpha, NP0*n0 - n187*n5)*n166*n48*n5/n177 + n48*n5*n54) + n111*n322*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n114*n166*n5/n177 + pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n171) + n111*n323*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n48/n177 + n126*n48) + n111*n325*(pow(alpha, NP0*n0 - n15*n187)*n114*n15*n166/n177 + pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n125*n64) + n111*n326*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)*(pow(alpha, NP0*n0 - n17*n187)*n166*n17*n48/n177 + n17*n48*n66) + n111*n327*(pow(alpha, NP0*n0 - n11*n187)*n11*n114*n166/n177 + pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n139*n60) + n111*n329*(pow(alpha, NP0*n0 - n17*n187)*n114*n166*n17/n177 + pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n30*n44*n66) + n111*n330*(pow(alpha, NP0*n0 - n18*n187)*n114*n166*n18/n177 + pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n172) + n111*n99*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)*(pow(alpha, NP0*n0 - n18*n187)*n166*n18*n48/n177 + n146*n48)/n300 + n111*n94*xF[3]*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159)*(pow(alpha, NP0*n0 - n13*n187)*n13*n166*n48/n177 + n121*n48)/n295 + n111*n82*xF[10]*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150)*(pow(alpha, NP0*n0 - n187*n4)*n166*n4*n48/n177 + n129*n48)/n286 + n120*n70*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n22*n30/n177 + pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37)/n275 + n130*n70*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n22*n30/n177 + pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43)/n281 + n131*n70*(pow(alpha, NP0*n0 - n187*n8)*n166*n22*n30*n8/n177 + pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145)/n273 + n132*n70*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n22*n30/n177 + pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137)/n277 + n134*n70*(pow(alpha, NP0*n0 - n187*n7)*n166*n22*n30*n7/n177 + pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34)/n272 + n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + n328*n70*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n22*n30/n177 + pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41) + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438)) - n334 - xTj*(n111*n120*n405 + n111*n122*n404 + n111*n123*n399 + n111*n127*n401 + n111*n130*n367/n281 + n111*n131*n403 + n111*n132*n400 + n111*n134*n402 + n111*n147*n354/n268 + n111*n311*n397 + n111*n312*n398 + n111*n322*n390 + n111*n325*n366 + n111*n327*n362 + n111*n328*n365 + n111*n329*n368 + n111*n330*n369 + n112*n70*n71/n237 + n113*n70*n80/n248 + n115*n70*n74/n250 + n126*n49*n70/n245 + n149*n304*n70 + n150*n305*n70 + n151*n303*n70 + n154*n70*xF[14]/n239 + n156*n308*n70 + n159*n310*n70 + n161*n70*xF[5]/n246 + n162*n309*n70 + n164*n307*n70 + n167*n70/n242 + n168*n70/n238 + n317*n70*n76 + n318*n70*n78), -n21);
23104 NP_sqrt_base = fabs(NP_sqrt_base);
23105 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
23106 NT1 = n116*(n180 - log(-pow(alpha, NP1*n0)*n166 + 1));
23107 g0 = MW[1] - Mstar;
23108 g1 = MW[0] - Mstar;
23111 g4 = MW[10] - Mstar;
23112 g5 = MW[11] - Mstar;
23113 g6 = MW[12] - Mstar;
23114 g7 = MW[13] - Mstar;
23115 g8 = MW[14] - Mstar;
23116 g9 = MW[15] - Mstar;
23117 g10 = MW[16] - Mstar;
23118 g11 = MW[2] - Mstar;
23119 g12 = MW[3] - Mstar;
23120 g13 = MW[4] - Mstar;
23121 g14 = MW[5] - Mstar;
23122 g15 = MW[6] - Mstar;
23123 g16 = MW[7] - Mstar;
23124 g17 = MW[8] - Mstar;
23125 g18 = MW[9] - Mstar;
23130 g23 = pow(alpha, -g1);
23131 g24 = pow(alpha, -g4);
23132 g25 = pow(alpha, -g5);
23133 g26 = pow(alpha, -g6);
23134 g27 = pow(alpha, -g7);
23135 g28 = pow(alpha, -g8);
23136 g29 = pow(alpha, -g9);
23137 g30 = pow(alpha, -g10);
23138 g31 = pow(alpha, -g0);
23139 g32 = pow(alpha, -g11);
23140 g33 = pow(alpha, -g12);
23141 g34 = pow(alpha, -g13);
23142 g35 = pow(alpha, -g14);
23143 g36 = pow(alpha, -g15);
23144 g37 = pow(alpha, -g16);
23145 g38 = pow(alpha, -g17);
23146 g39 = pow(alpha, -g18);
23147 g40 = log(xF[0]/xF[1]);
23149 g42 = pow(alpha, NP1*g0);
23150 g43 = pow(alpha, NP1*g1);
23151 g44 = pow(alpha, NP1*g4);
23153 g46 = pow(alpha, NP1*g5);
23154 g47 = pow(alpha, NP1*g6);
23155 g48 = pow(alpha, NP1*g7);
23156 g49 = pow(alpha, NP1*g8);
23157 g50 = pow(alpha, NP1*g9);
23158 g51 = pow(alpha, NP1*g10);
23159 g52 = pow(alpha, NP1*g11);
23160 g53 = pow(alpha, NP1*g12);
23161 g54 = pow(alpha, NP1*g13);
23162 g55 = pow(alpha, NP1*g14);
23163 g56 = pow(alpha, NP1*g15);
23164 g57 = pow(alpha, NP1*g16);
23165 g58 = pow(alpha, NP1*g17);
23166 g59 = pow(alpha, NP1*g18);
23206 g99 = g20/(g3*xF[1]);
23207 g100 = pow(alpha, g0*g41) - 1;
23208 g101 = pow(alpha, g0*g41) - 1;
23209 g102 = pow(alpha, g1*g41) - 1;
23210 g103 = pow(alpha, g11*g41) - 1;
23211 g104 = pow(alpha, g12*g41) - 1;
23212 g105 = pow(alpha, g13*g41) - 1;
23213 g106 = pow(alpha, g14*g41) - 1;
23214 g107 = pow(alpha, g15*g41) - 1;
23215 g108 = pow(alpha, g16*g41) - 1;
23216 g109 = pow(alpha, g17*g41) - 1;
23217 g110 = pow(alpha, g18*g41) - 1;
23218 g111 = pow(alpha, g4*g41) - 1;
23219 g112 = pow(alpha, g41*g5) - 1;
23220 g113 = pow(alpha, g41*g6) - 1;
23221 g114 = pow(alpha, g41*g7) - 1;
23222 g115 = pow(alpha, g41*g8) - 1;
23223 g116 = pow(alpha, g41*g9) - 1;
23224 g117 = pow(alpha, g10*g41) - 1;
23225 g118 = -pow(alpha, g1*g41);
23226 g119 = -pow(alpha, g4*g41);
23227 g120 = -pow(alpha, g41*g5);
23228 g121 = -pow(alpha, g41*g6);
23229 g122 = -pow(alpha, g41*g7);
23230 g123 = -pow(alpha, g41*g8);
23231 g124 = -pow(alpha, g41*g9);
23232 g125 = -pow(alpha, g10*g41);
23233 g126 = -pow(alpha, g11*g41);
23234 g127 = -pow(alpha, g12*g41);
23235 g128 = -pow(alpha, g13*g41);
23236 g129 = -pow(alpha, g14*g41);
23237 g130 = -pow(alpha, g15*g41);
23238 g131 = -pow(alpha, g16*g41);
23239 g132 = -pow(alpha, g17*g41);
23240 g133 = -pow(alpha, g18*g41);
23242 g135 = -g118 - g43;
23243 g136 = -g119 - g44;
23244 g137 = -g120 - g46;
23245 g138 = -g121 - g47;
23246 g139 = -g122 - g48;
23247 g140 = -g123 - g49;
23248 g141 = -g124 - g50;
23249 g142 = -g125 - g51;
23250 g143 = -g126 - g52;
23251 g144 = -g127 - g53;
23252 g145 = -g128 - g54;
23253 g146 = -g129 - g55;
23254 g147 = -g130 - g56;
23255 g148 = -g131 - g57;
23256 g149 = -g132 - g58;
23257 g150 = -g133 - g59;
23258 g151 = pow(alpha, g1*g41) + g81;
23260 g153 = pow(alpha, g4*g41) + g82;
23261 g154 = pow(alpha, g41*g5) + g83;
23262 g155 = pow(alpha, g41*g6) + g84;
23263 g156 = pow(alpha, g41*g7) + g85;
23264 g157 = pow(alpha, g41*g8) + g86;
23265 g158 = pow(alpha, g41*g9) + g87;
23266 g159 = pow(alpha, g10*g41) + g88;
23267 g160 = pow(alpha, g11*g41) + g89;
23268 g161 = pow(alpha, g12*g41) + g90;
23269 g162 = pow(alpha, g13*g41) + g91;
23270 g163 = pow(alpha, g14*g41) + g92;
23271 g164 = pow(alpha, g15*g41) + g93;
23272 g165 = pow(alpha, g16*g41) + g94;
23273 g166 = pow(alpha, g17*g41) + g95;
23274 g167 = pow(alpha, g18*g41) + g96;
23278 g171 = xF[10]/g153;
23279 g172 = xF[15]/g158;
23281 g174 = xF[16]/g159;
23284 g177 = xF[12]/g155;
23285 g178 = xF[13]/g156;
23286 g179 = xF[11]/g154;
23288 g181 = xF[14]/g157;
23293 g186 = xF[15]/g141;
23297 g190 = xF[11]/g137;
23299 g192 = xF[13]/g139;
23300 g193 = xF[16]/g142;
23303 g196 = xF[14]/g140;
23305 g198 = xF[12]/g138;
23306 g199 = xF[10]/g136;
23343 g236 = log(g152*g21*g99/g64);
23344 g237 = log(g134*g21*g99/g63);
23345 g238 = log(g152*g22*g61/g101);
23347 g240 = log(g134*g22*g61/g100);
23349 g242 = -g101*g170*g241 - g168*g239*(g96 + 1) - g168*g241*(pow(alpha, g18*g41) - 1) - g169*g239*(g95 + 1) - g169*g241*(pow(alpha, g17*g41) - 1) - g170*g239*g64 - g171*g239*(g82 + 1) - g171*g241*(pow(alpha, g4*g41) - 1) - g172*g239*(g87 + 1) - g172*g241*(pow(alpha, g41*g9) - 1) - g173*g239*(g90 + 1) - g173*g241*(pow(alpha, g12*g41) - 1) - g174*g239*(g88 + 1) - g174*g241*(pow(alpha, g10*g41) - 1) - g175*g239*(g94 + 1) - g175*g241*(pow(alpha, g16*g41) - 1) - g176*g239*(g91 + 1) - g176*g241*(pow(alpha, g13*g41) - 1) - g177*g239*(g84 + 1) - g177*g241*(pow(alpha, g41*g6) - 1) - g178*g239*(g85 + 1) - g178*g241*(pow(alpha, g41*g7) - 1) - g179*g239*(g83 + 1) - g179*g241*(pow(alpha, g41*g5) - 1) - g180*g239*(g93 + 1) - g180*g241*(pow(alpha, g15*g41) - 1) - g181*g239*(g86 + 1) - g181*g241*(pow(alpha, g41*g8) - 1) - g182*g239*(g92 + 1) - g182*g241*(pow(alpha, g14*g41) - 1) - g183*g239*(g89 + 1) - g183*g241*(pow(alpha, g11*g41) - 1) - g184*g239*(g81 + 1) - g184*g241*(pow(alpha, g1*g41) - 1) - g97*xF[0] - g97*xF[10] - g97*xF[11] - g97*xF[12] - g97*xF[13] - g97*xF[14] - g97*xF[15] - g97*xF[16] - g97*xF[1] - g97*xF[2] - g97*xF[3] - g97*xF[4] - g97*xF[5] - g97*xF[6] - g97*xF[7] - g97*xF[8] - g97*xF[9];
23350 LpF = xF[0]*(g23 + 1.0)*(g208*g237 + g219*g240 + g60)/(g45*(g23 - 1.0)) + xF[10]*(g24 + 1.0)*(g216*g237 + g234*g240 + g60)/(g45*(g24 - 1.0)) + xF[11]*(g25 + 1.0)*(g214*g237 + g221*g240 + g60)/(g45*(g25 - 1.0)) + xF[12]*(g26 + 1.0)*(g202*g237 + g231*g240 + g60)/(g45*(g26 - 1.0)) + xF[13]*(g27 + 1.0)*(g211*g237 + g232*g240 + g60)/(g45*(g27 - 1.0)) + xF[14]*(g28 + 1.0)*(g215*g237 + g230*g240 + g60)/(g45*(g28 - 1.0)) + xF[15]*(g29 + 1.0)*(g204*g237 + g220*g240 + g60)/(g45*(g29 - 1.0)) + xF[16]*(g30 + 1.0)*(g213*g237 + g228*g240 + g60)/(g45*(g30 - 1.0)) + xF[1]*(g31 + 1.0)*(g218*g237 + g225*g240 + g60)/(g45*(g31 - 1.0)) + xF[2]*(g32 + 1.0)*(g207*g237 + g222*g240 + g60)/(g45*(g32 - 1.0)) + xF[3]*(g33 + 1.0)*(g212*g237 + g223*g240 + g60)/(g45*(g33 - 1.0)) + xF[4]*(g34 + 1.0)*(g205*g237 + g224*g240 + g60)/(g45*(g34 - 1.0)) + xF[5]*(g35 + 1.0)*(g209*g237 + g235*g240 + g60)/(g45*(g35 - 1.0)) + xF[6]*(g36 + 1.0)*(g210*g237 + g229*g240 + g60)/(g45*(g36 - 1.0)) + xF[7]*(g37 + 1.0)*(g206*g237 + g233*g240 + g60)/(g45*(g37 - 1.0)) + xF[8]*(g38 + 1.0)*(g217*g237 + g226*g240 + g60)/(g45*(g38 - 1.0)) + xF[9]*(g39 + 1.0)*(g203*g237 + g227*g240 + g60)/(g45*(g39 - 1.0));
23355 xP[0] = g102*g185*g62;
23356 xP[1] = g100*g191*g62;
23357 xP[2] = g103*g189*g62;
23358 xP[3] = g104*g194*g62;
23359 xP[4] = g105*g187*g62;
23360 xP[5] = g106*g201*g62;
23361 xP[6] = g107*g195*g62;
23362 xP[7] = g108*g188*g62;
23363 xP[8] = g109*g197*g62;
23364 xP[9] = g110*g200*g62;
23365 xP[10] = g111*g199*g62;
23366 xP[11] = g112*g190*g62;
23367 xP[12] = g113*g198*g62;
23368 xP[13] = g114*g192*g62;
23369 xP[14] = g115*g196*g62;
23370 xP[15] = g116*g186*g62;
23371 xP[16] = g117*g193*g62;
23372 xT[0] = g185*g65*g98;
23373 xT[1] = g191*g63*g98;
23374 xT[2] = g189*g66*g98;
23375 xT[3] = g194*g67*g98;
23376 xT[4] = g187*g68*g98;
23377 xT[5] = g201*g69*g98;
23378 xT[6] = g195*g70*g98;
23379 xT[7] = g188*g71*g98;
23380 xT[8] = g197*g72*g98;
23381 xT[9] = g200*g73*g98;
23382 xT[10] = g199*g74*g98;
23383 xT[11] = g190*g75*g98;
23384 xT[12] = g198*g76*g98;
23385 xT[13] = g192*g77*g98;
23386 xT[14] = g196*g78*g98;
23387 xT[15] = g186*g79*g98;
23388 xT[16] = g193*g80*g98;
23391 n0 = -2.00000000000000;
23392 n1 = MW[0] - Mstar;
23396 n5 = MW[10] - Mstar;
23397 n6 = MW[11] - Mstar;
23398 n7 = MW[12] - Mstar;
23399 n8 = MW[13] - Mstar;
23400 n9 = MW[14] - Mstar;
23401 n10 = MW[15] - Mstar;
23402 n11 = MW[16] - Mstar;
23403 n12 = MW[17] - Mstar;
23404 n13 = MW[1] - Mstar;
23405 n14 = MW[2] - Mstar;
23406 n15 = MW[3] - Mstar;
23407 n16 = MW[4] - Mstar;
23408 n17 = MW[5] - Mstar;
23409 n18 = MW[6] - Mstar;
23410 n19 = MW[7] - Mstar;
23411 n20 = MW[8] - Mstar;
23412 n21 = MW[9] - Mstar;
23421 n30 = pow(n1, -n0);
23422 n31 = pow(n2, -n0);
23423 n32 = pow(n5, -n0);
23424 n33 = pow(n6, -n0);
23425 n34 = pow(n7, -n0);
23426 n35 = pow(n8, -n0);
23427 n36 = pow(n9, -n0);
23428 n37 = pow(n10, -n0);
23429 n38 = pow(n11, -n0);
23430 n39 = pow(n12, -n0);
23431 n40 = pow(n13, -n0);
23432 n41 = pow(n14, -n0);
23433 n42 = pow(n15, -n0);
23434 n43 = pow(n16, -n0);
23435 n44 = pow(n17, -n0);
23436 n45 = pow(n18, -n0);
23437 n46 = pow(n19, -n0);
23438 n47 = pow(n20, -n0);
23439 n48 = pow(n21, -n0);
23444 n53 = pow(alpha, n51);
23445 n54 = n25 + n27*xF[0];
23446 n55 = n25 + n27*xPj;
23447 n56 = pow(alpha, NP0*n5);
23448 n57 = pow(alpha, NP0*n6);
23449 n58 = pow(alpha, NP0*n7);
23450 n59 = pow(alpha, NP0*n8);
23451 n60 = pow(alpha, NP0*n9);
23452 n61 = pow(alpha, NP0*n10);
23453 n62 = pow(alpha, NP0*n11);
23454 n63 = pow(alpha, NP0*n12);
23455 n64 = pow(alpha, NP0*n13);
23456 n65 = pow(alpha, NP0*n14);
23457 n66 = pow(alpha, NP0*n15);
23458 n67 = pow(alpha, NP0*n16);
23459 n68 = pow(alpha, NP0*n17);
23460 n69 = pow(alpha, NP0*n18);
23461 n70 = pow(alpha, NP0*n19);
23462 n71 = pow(alpha, NP0*n20);
23463 n72 = pow(alpha, NP0*n21);
23476 n85 = pow(alpha, NP0*n0*n23);
23477 n86 = pow(n55, -n0);
23538 n147 = log((-1.0 + xPj/xF[0])/n3);
23539 n148 = -n91*xF[15];
23540 n149 = -n102*xF[9];
23541 n150 = n21*n72*xF[9];
23542 n151 = -n89*xF[13];
23546 n155 = n31*n39*n63;
23548 n157 = n31*n33*n57;
23549 n158 = n31*n47*n71;
23550 n159 = n31*n38*n62;
23551 n160 = n31*n34*n58;
23552 n161 = n31*n32*n56;
23553 n162 = n31*n42*n66;
23554 n163 = n110*n154 + 1;
23555 n164 = n147 + n22 + n49 + n73;
23556 n165 = n154*n53/n163;
23557 n166 = n120*(n164 - log(n163)) + 1;
23558 n167 = pow(alpha, n1*n166);
23559 n168 = pow(alpha, n166*n5);
23560 n169 = pow(alpha, n166*n6);
23561 n170 = pow(alpha, n166*n7);
23562 n171 = pow(alpha, n166*n8);
23563 n172 = pow(alpha, n166*n9);
23564 n173 = pow(alpha, n10*n166);
23565 n174 = pow(alpha, n11*n166);
23566 n175 = pow(alpha, n12*n166);
23567 n176 = pow(alpha, n13*n166);
23568 n177 = pow(alpha, n14*n166);
23569 n178 = pow(alpha, n15*n166);
23570 n179 = pow(alpha, n16*n166);
23571 n180 = pow(alpha, n166*n17);
23572 n181 = pow(alpha, n166*n18);
23573 n182 = pow(alpha, n166*n19);
23574 n183 = pow(alpha, n166*n20);
23575 n184 = pow(alpha, n166*n21);
23594 n203 = pow(alpha, n166*n23) + n83 - 1;
23595 n204 = n84 - 1 + 1.0/n168;
23596 n205 = n87 - 1 + 1.0/n169;
23597 n206 = n88 - 1 + 1.0/n170;
23598 n207 = n89 - 1 + 1.0/n171;
23599 n208 = n90 - 1 + 1.0/n172;
23600 n209 = n91 - 1 + 1.0/n173;
23601 n210 = n92 - 1 + 1.0/n174;
23602 n211 = n93 - 1 + 1.0/n175;
23603 n212 = n94 - 1 + 1.0/n176;
23604 n213 = n95 - 1 + 1.0/n177;
23605 n214 = n96 - 1 + 1.0/n178;
23606 n215 = n97 - 1 + 1.0/n179;
23607 n216 = n98 - 1 + 1.0/n180;
23608 n217 = n99 - 1 + 1.0/n181;
23609 n218 = n100 - 1 + 1.0/n182;
23610 n219 = n101 - 1 + 1.0/n183;
23611 n220 = n102 - 1 + 1.0/n184;
23612 n221 = pow(n203, 3);
23613 n222 = pow(n204, 3);
23614 n223 = pow(n205, 3);
23615 n224 = pow(n206, 3);
23616 n225 = pow(n207, 3);
23617 n226 = pow(n208, 3);
23618 n227 = pow(n209, 3);
23619 n228 = pow(n210, 3);
23620 n229 = pow(n211, 3);
23621 n230 = pow(n212, 3);
23622 n231 = pow(n213, 3);
23623 n232 = pow(n214, 3);
23624 n233 = pow(n215, 3);
23625 n234 = pow(n216, 3);
23626 n235 = pow(n217, 3);
23627 n236 = pow(n218, 3);
23628 n237 = pow(n219, 3);
23629 n238 = pow(n220, 3);
23630 n239 = xF[11]/n205;
23631 n240 = xF[12]/n206;
23632 n241 = xF[17]/n211;
23634 n243 = xF[10]/n204;
23637 n246 = xF[16]/n210;
23639 n248 = pow(n214, n24)*xF[3];
23641 n250 = pow(n211, n24)*xF[17];
23642 n251 = pow(n204, n24)*xF[10];
23643 n252 = xF[17]/n229;
23644 n253 = pow(n203, n24)*xF[0];
23645 n254 = xF[12]/n224;
23646 n255 = xF[10]/n222;
23647 n256 = n2*xF[14]/n208;
23648 n257 = n2*xF[4]/n215;
23650 n259 = n2*pow(n203, n24);
23651 n260 = n2*xF[6]/n217;
23652 n261 = n64*xF[1]/n212;
23653 n262 = n68*xF[5]/n216;
23654 n263 = n70*xF[7]/n218;
23655 n264 = n59*xF[13]/n207;
23656 n265 = n65*xF[2]/n213;
23657 n266 = n61*xF[15]/n209;
23658 n267 = n60*xF[14]/n208;
23660 n269 = pow(n215, n24)*n97*xF[4];
23661 n270 = n97*xF[4]/n233;
23662 n271 = -n138*pow(n216, n24);
23663 n272 = -n100*xF[7]/n236;
23664 n273 = -pow(n212, n24)*n94*xF[1];
23665 n274 = -n100*pow(n218, n24)*xF[7];
23666 n275 = -n101*pow(n219, n24)*xF[8];
23667 n276 = n244*n31*n48*n72;
23668 n277 = n31*n43*n67*xF[4]/n215;
23669 n278 = n31*n45*n69*xF[6]/n217;
23670 n279 = n2*n23*n242*n53*n74;
23671 n280 = n156*n242*n74;
23672 n281 = n161*n243*n74;
23673 n282 = n157*n239*n74;
23674 n283 = n160*n240*n74;
23675 n284 = n134*n264*n74;
23676 n285 = n143*n267*n74;
23677 n286 = n135*n266*n74;
23678 n287 = n159*n246*n74;
23679 n288 = n155*n241*n74;
23680 n289 = n122*n261*n74;
23681 n290 = n136*n265*n74;
23682 n291 = n162*n247*n74;
23684 n293 = n126*n262*n74;
23686 n295 = n131*n263*n74;
23687 n296 = n158*n245*n74;
23690 n299 = n154/(n163*n167);
23692 n301 = n125*n2*n299 + n125*n2;
23693 n302 = n130*n2 + n165*n2*n200;
23694 n303 = n152 + n165*n193*n2;
23695 n304 = n165*n76/n170 + n58*n76;
23696 n305 = n165*n79/n171 + n59*n79;
23697 n306 = n129*n2 + n165*n191*n2;
23698 n307 = n165*n81/n173 + n61*n81;
23699 n308 = n137*n2 + n165*n2*n201;
23700 n309 = n128*n2 + n165*n188*n2;
23701 n310 = n165*n77/n176 + n64*n77;
23702 n311 = n165*n80/n177 + n65*n80;
23703 n312 = n124*n2 + n165*n189*n2;
23704 n313 = n127*n2 + n165*n185*n2;
23705 n314 = n165*n75/n180 + n68*n75;
23706 n315 = n123*n2 + n165*n190*n2;
23707 n316 = n165*n82/n182 + n70*n82;
23708 n317 = n153 + n165*n192*n2;
23709 n318 = n165*n78/n184 + n72*n78;
23710 n319 = pow(n301, -n0);
23711 n320 = pow(n302, -n0);
23712 n321 = pow(n303, -n0);
23713 n322 = pow(n304, -n0);
23714 n323 = pow(n305, -n0);
23715 n324 = pow(n306, -n0);
23716 n325 = pow(n307, -n0);
23717 n326 = pow(n308, -n0);
23718 n327 = pow(n309, -n0);
23719 n328 = pow(n310, -n0);
23720 n329 = pow(n311, -n0);
23721 n330 = pow(n312, -n0);
23722 n331 = pow(n313, -n0);
23723 n332 = pow(n314, -n0);
23724 n333 = pow(n315, -n0);
23725 n334 = pow(n316, -n0);
23726 n335 = pow(n317, -n0);
23727 n336 = pow(n318, -n0);
23729 n338 = n303*xF[11];
23732 n341 = n0*n165*n2*n23/n167 + n0*n2*n23*n53;
23734 n343 = n110*n142*n299 + n110*n142;
23735 n344 = pow(n220, n24)*n318;
23736 n345 = pow(n207, n24)*n305;
23737 n346 = pow(n208, n24)*n306;
23738 n347 = pow(n209, n24)*n307;
23739 n348 = pow(n206, n24)*n304*xF[12];
23740 n349 = pow(n217, n24)*n315*xF[6];
23746 n355 = n101*n335*xF[8]/n237;
23747 n356 = n321*n87*xF[11]/n223;
23748 n357 = n146*pow(n203, n24)*n301*n74;
23749 n358 = n0*n2*n23*n253*n53*n74*(pow(alpha, n166*n23 + n51)*n1*n154*n2/n163 + n125*n2);
23750 n359 = n130*n251*n50*n74*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2);
23751 n360 = pow(n205, n24)*n50*n57*n6*n74*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152);
23752 n361 = pow(n206, n24)*n50*n58*n7*n74*xF[12]*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76);
23753 n362 = n140*pow(n207, n24)*n50*n74*xF[13]*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79);
23754 n363 = n129*pow(n208, n24)*n50*n74*xF[14]*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2);
23755 n364 = n144*pow(n209, n24)*n50*n74*xF[15]*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81);
23756 n365 = n137*pow(n210, n24)*n50*n74*xF[16]*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2);
23757 n366 = n128*n250*n50*n74*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2);
23758 n367 = n139*pow(n212, n24)*n50*n74*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77);
23759 n368 = n14*pow(n213, n24)*n50*n65*n74*xF[2]*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80);
23760 n369 = n124*n248*n50*n74*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2);
23761 n370 = n127*pow(n215, n24)*n50*n74*xF[4]*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2);
23762 n371 = n17*pow(n216, n24)*n50*n68*n74*xF[5]*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75);
23763 n372 = n123*pow(n217, n24)*n50*n74*xF[6]*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2);
23764 n373 = n141*pow(n218, n24)*n50*n74*xF[7]*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82);
23765 n374 = n145*pow(n219, n24)*n50*n74*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153);
23766 n375 = n150*pow(n220, n24)*n50*n74*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78);
23767 n376 = 1.0*n125*n2*n253*n301*n74;
23768 n377 = n146*pow(n203, n24)*n343*n74;
23770 n379 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n193*pow(n54, n24)*n86 - pow(alpha, n1*n29)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86/n169 + n119*n165*n193 + n157;
23771 n380 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n198*pow(n54, n24)*n86 - pow(alpha, n1*n29)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86/n170 + n119*n165*n198 + n160;
23772 n381 = pow(alpha, n1*n29)*n134*pow(n163, n24)*pow(n54, n24)*n86/n171 + pow(alpha, n1*n29)*pow(n163, n24)*n187*n23*n31*pow(n54, n24)*n86 + n112*n134 + n165*n187*n23*n31;
23773 n382 = pow(alpha, n1*n29)*n143*pow(n163, n24)*pow(n54, n24)*n86/n172 + pow(alpha, n1*n29)*pow(n163, n24)*n191*n23*n31*pow(n54, n24)*n86 + n113*n143 + n165*n191*n23*n31;
23774 n383 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n197*pow(n54, n24)*n86 - pow(alpha, n1*n29)*n135*pow(n163, n24)*pow(n54, n24)*n86/n173 + n119*n165*n197 + n135*n61;
23775 n384 = pow(alpha, n1*n29)*pow(n163, n24)*n201*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86/n174 + n114*n31*n38 + n165*n201*n23*n31;
23776 n385 = pow(alpha, n1*n29)*n136*pow(n163, n24)*pow(n54, n24)*n86/n177 + pow(alpha, n1*n29)*pow(n163, n24)*n195*n23*n31*pow(n54, n24)*n86 + n115*n136 + n165*n195*n23*n31;
23777 n386 = pow(alpha, n1*n29)*pow(n163, n24)*n190*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86/n181 + n118*n31*n45 + n165*n190*n23*n31;
23778 n387 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n199*pow(n54, n24)*n86 - pow(alpha, n1*n29)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86/n184 + n119*n165*n199 + n31*n48*n72;
23779 n388 = pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + n112*n134 + n165*n187*n23*n31);
23780 n389 = n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + n113*n143 + n165*n191*n23*n31);
23781 n390 = n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + n114*n31*n38 + n165*n201*n23*n31);
23782 n391 = n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + n115*n136 + n165*n195*n23*n31);
23783 n392 = n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + n116*n31*n43 + n165*n185*n23*n31);
23784 n393 = pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + n118*n31*n45 + n165*n190*n23*n31);
23785 n394 = n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + n119*n165*n200 + n161);
23786 n395 = n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + n119*n165*n193 + n157);
23787 n396 = n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + n119*n165*n198 + n160);
23788 n397 = n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n197 + n135*n61);
23789 n398 = n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + n119*n165*n188 + n155);
23790 n399 = n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n194 + n122*n64);
23791 n400 = n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + n119*n165*n189 + n162);
23792 n401 = n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n202 + n126*n68);
23793 n402 = n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n186 + n131*n70);
23794 n403 = n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + n119*n165*n192 + n158);
23795 n404 = n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + n119*n165*n199 + n31*n48*n72);
23796 n405 = xTj*(n103*n248*n312*n74 + n104*n348*n74 + n105*n349*n74 + n106*n250*n309*n74 + n107*n251*n302*n74 + n108*n253*n301*n74 + n109*pow(n205, n24)*n338*n74 - n121*pow(n210, n24)*n308*n74 + n123*n260*n74 + n124*n258*n74 + n125*n2*n242*n74 + n127*n257*n74 + n128*n2*n241*n74 + n129*n256*n74 + n130*n2*n243*n74 - n132*n346*n74 - n133*pow(n213, n24)*n311*n74 + n137*n2*n246*n74 + n148*n347*n74 + n149*n344*n74 + n151*n345*n74 + n152*n239*n74 + n153*n245*n74 + n240*n58*n74*n76 + n244*n72*n74*n78 + n261*n74*n77 + n262*n74*n75 + n263*n74*n82 + n264*n74*n79 + n265*n74*n80 + n266*n74*n81 - n269*n313*n74 + n271*n314*n74 + n273*n310*n74 + n274*n316*n74 + n275*n317*n74);
23797 n406 = n279 + n357 + n405;
23798 n407 = n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375 + n377 + n388 + n389 + n390 + n391 + n392 + n393 + n394 + n395 + n396 + n397 + n398 + n399 + n400 + n401 + n402 + n403 + n404;
23799 n408 = -n101*n340*n74*(n145*n50 + n165*n192*n50)/n237 + n103*n312*n74*xF[3]*(n124*n50 + n165*n189*n50)/n232 + n104*n254*n304*n74*(n165*n198*n50 + n50*n58*n7) + n105*n249*n315*n74*(n123*n50 + n165*n190*n50) + n106*n252*n309*n74*(n128*n50 + n165*n188*n50) + n107*n255*n302*n74*(n130*n50 + n165*n200*n50) + n108*n337*n354*n74 + n109*n338*n74*(n165*n193*n50 + n50*n57*n6)/n223 - n121*n308*n74*(n137*n50 + n165*n201*n50)/n228 - n132*n306*n74*(n129*n50 + n165*n191*n50)/n226 - n133*n311*n74*(n14*n50*n65 + n165*n195*n50)/n231 - n138*n314*n74*(n165*n202*n50 + n17*n50*n68)/n234 + n148*n307*n74*(n144*n50 + n165*n197*n50)/n227 + n149*n318*n74*(n165*n199*n50 + n21*n50*n72)/n238 + n151*n305*n74*(n140*n50 + n165*n187*n50)/n225 - n268*n339*n74*(n139*n50 + n165*n194*n50) - n270*n313*n74*(n127*n50 + n165*n185*n50) + n272*n316*n74*(n141*n50 + n165*n186*n50) + n407;
23801 NP_b = -n125*n146*n259*n300*n74 - n279 - n29*(1.0*n125*n2*n253*n74*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2) + 0.5*n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) - 1.0*n146*n319*n74/n221 + n298 - 0.5*xTj*(n100*n24*n334*n74*xF[7]/n236 + n102*n24*n336*n74*xF[9]/n238 + n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + pow(alpha, -n15*n166 + n51)*n119*n15*n154/n163 + n162) + n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + pow(alpha, -n166*n7 + n51)*n119*n154*n7/n163 + n160) + n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + pow(alpha, -n12*n166 + n51)*n119*n12*n154/n163 + n155) + n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + pow(alpha, -n166*n5 + n51)*n119*n154*n5/n163 + n161) + n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + pow(alpha, -n166*n6 + n51)*n119*n154*n6/n163 + n157) + n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + pow(alpha, -n11*n166 + n51)*n11*n154*n23*n31/n163 + n114*n31*n38) + n121*n24*n353*n74 + n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + pow(alpha, -n166*n9 + n51)*n154*n23*n31*n9/n163 + n113*n143) + n132*n24*n350*n74 + n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, -n14*n166 + n51)*n14*n154*n23*n31/n163 + n115*n136) + n133*n24*n351*n74 + n138*n24*n352*n74 + n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) + n146*n24*n319*n74/n221 + n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n10*n166 + n51)*n10*n119*n154/n163 + n135*n61) + n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + pow(alpha, -n166*n21 + n51)*n119*n154*n21/n163 + n31*n48*n72) + pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + pow(alpha, -n166*n8 + n51)*n154*n23*n31*n8/n163 + n112*n134) + pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + pow(alpha, -n166*n18 + n51)*n154*n18*n23*n31/n163 + n118*n31*n45) + n24*n249*n333*n74*n99 + n24*n252*n327*n74*n93 + n24*n254*n322*n74*n88 + n24*n255*n320*n74*n84 + n24*n268*n342*n74 + n24*n270*n331*n74 + n24*n355*n74 + n24*n356*n74 + n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + pow(alpha, -n16*n166 + n51)*n154*n16*n23*n31/n163 + n116*n31*n43) + n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n17 + n51)*n119*n154*n17/n163 + n126*n68) + n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n13*n166 + n51)*n119*n13*n154/n163 + n122*n64) + n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n19 + n51)*n119*n154*n19/n163 + n131*n70) + n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + pow(alpha, -n166*n20 + n51)*n119*n154*n20/n163 + n158) + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375 + n24*n330*n74*n96*xF[3]/n232 + n24*n325*n74*n91*xF[15]/n227 + n24*n323*n74*n89*xF[13]/n225)) - n74*xTj*(n103*n248*n312 + n104*n348 + n105*n349 + n106*n250*n309 + n107*n251*n302 + n108*n253*n301 + n109*pow(n205, n24)*n338 - n121*pow(n210, n24)*n308 + n123*n260 + n124*n258 + n125*n2*n242 + n127*n257 + n128*n2*n241 + n129*n256 + n130*n2*n243 - n132*n346 - n133*pow(n213, n24)*n311 + n137*n2*n246 + n148*n347 + n149*n344 + n151*n345 + n152*n239 + n153*n245 + n240*n58*n76 + n244*n72*n78 + n261*n77 + n262*n75 + n263*n82 + n264*n79 + n265*n80 + n266*n81 - n269*n313 + n271*n314 + n273*n310 + n274*n316 + n275*n317);
23802 NP_2a = -n74*(pow(alpha, n1*n29)*n0*n108*n142*pow(n300, -n0)*xF[0]/n221 + pow(alpha, n1*n29)*n0*n142*n253*n300 + n108*n156*n253*(-1 + (-n25 + xPj*xTj)/(n163*n167*n54)) - 1.0*n156*n242 + 1.0*xTj*(n0*n2*n23*n253*n53*(pow(alpha, n166*n23 + n51)*n1*n154*n2/n163 + n125*n2) + n100*n24*n334*xF[7]/n236 + n102*n24*n336*xF[9]/n238 + n103*n248*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + n119*n165*n189 + n162) + n104*pow(n206, n24)*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + n119*n165*n198 + n160) + n106*n250*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + n119*n165*n188 + n155) + n107*n251*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + n119*n165*n200 + n161) + n109*pow(n205, n24)*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + n119*n165*n193 + n157) + n121*pow(n210, n24)*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + n114*n31*n38 + n165*n201*n23*n31) + n121*n24*n353 + n122*n261 + n123*pow(n217, n24)*n50*xF[6]*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2) + n124*n248*n50*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2) + n126*n262 + n127*pow(n215, n24)*n50*xF[4]*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2) + n128*n250*n50*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2) + n129*pow(n208, n24)*n50*xF[14]*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2) + n130*n251*n50*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2) + n131*n263 + n132*pow(n208, n24)*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + n113*n143 + n165*n191*n23*n31) + n132*n24*n350 + n133*pow(n213, n24)*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + n115*n136 + n165*n195*n23*n31) + n133*n24*n351 + n134*n264 + n135*n266 + n136*n265 + n137*pow(n210, n24)*n50*xF[16]*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2) + n138*n24*n352 + n139*pow(n212, n24)*n50*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77) + n14*pow(n213, n24)*n50*n65*xF[2]*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80) + n140*pow(n207, n24)*n50*xF[13]*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79) + n141*pow(n218, n24)*n50*xF[7]*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82) + n143*n267 + n144*pow(n209, n24)*n50*xF[15]*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81) + n145*pow(n219, n24)*n50*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153) + n146*pow(n203, n24)*n343 + n146*n24*n319/n221 + n148*pow(n209, n24)*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n197 + n135*n61) + n149*pow(n220, n24)*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + n119*n165*n199 + n31*n48*n72) + n150*pow(n220, n24)*n50*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78) + n155*n241 + n156*n242 + n157*n239 + n158*n245 + n159*n246 + n160*n240 + n161*n243 + n162*n247 + n17*pow(n216, n24)*n50*n68*xF[5]*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75) + pow(n205, n24)*n50*n57*n6*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152) + pow(n206, n24)*n50*n58*n7*xF[12]*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76) + pow(n207, n24)*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + n112*n134 + n165*n187*n23*n31) + pow(n217, n24)*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + n118*n31*n45 + n165*n190*n23*n31) + n24*n249*n333*n99 + n24*n252*n327*n93 + n24*n254*n322*n88 + n24*n255*n320*n84 + n24*n268*n342 + n24*n270*n331 + n24*n355 + n24*n356 + n269*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + n116*n31*n43 + n165*n185*n23*n31) + n271*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n202 + n126*n68) + n273*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n194 + n122*n64) + n274*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n186 + n131*n70) + n275*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + n119*n165*n192 + n158) + n276 + n277 + n278 + n24*n330*n96*xF[3]/n232 + n24*n325*n91*xF[15]/n227 + n24*n323*n89*xF[13]/n225));
23803 NP_sqrt_base = (-NP0*n406 - n108*n74*xF[0]/(-n108 - n196 - 1) - n27*(-n100*n74*xF[7]/(n100 - 1 + pow(alpha, -n19*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n101*n74*xF[8]/(n101 - 1 + pow(alpha, -n20*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n102*n74*xF[9]/(n102 - 1 + pow(alpha, -n21*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n121*n74/(n92 - 1 + pow(alpha, -n11*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n132*n74/(n90 - 1 + pow(alpha, -n9*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n133*n74/(n95 - 1 + pow(alpha, -n14*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n138*n74/(n98 - 1 + pow(alpha, -n17*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n146*n74/(pow(alpha, n23*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1)) + n83 - 1) - n74*n84*xF[10]/(n84 - 1 + pow(alpha, -n5*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n87*xF[11]/(n87 - 1 + pow(alpha, -n6*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n88*xF[12]/(n88 - 1 + pow(alpha, -n7*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n89*xF[13]/(n89 - 1 + pow(alpha, -n8*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n91*xF[15]/(n91 - 1 + pow(alpha, -n10*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n93*xF[17]/(n93 - 1 + pow(alpha, -n12*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n94*xF[1]/(n94 - 1 + pow(alpha, -n13*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n96*xF[3]/(n96 - 1 + pow(alpha, -n15*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n97*xF[4]/(n97 - 1 + pow(alpha, -n16*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n99*xF[6]/(n99 - 1 + pow(alpha, -n18*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1)))) - pow(NP0, -n0)*(1.0*n125*n2*n253*n301*n74 - 0.5*n146*n301*n354*n74 + 0.5*n280 + 0.5*n377 - 0.5*n409))*(-n0*n27*(-n101*n74*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153)*(pow(alpha, -n166*n20 + n51)*n154*n20*n50/n163 + n145*n50)/n237 + n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + pow(alpha, -n15*n166 + n51)*n119*n15*n154/n163 + n162) + n103*n74*xF[3]*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2)*(pow(alpha, -n15*n166 + n51)*n15*n154*n50/n163 + n124*n50)/n232 + n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + pow(alpha, -n166*n7 + n51)*n119*n154*n7/n163 + n160) + n104*n254*n74*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76)*(pow(alpha, -n166*n7 + n51)*n154*n50*n7/n163 + n50*n58*n7) + n105*n249*n74*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2)*(pow(alpha, -n166*n18 + n51)*n154*n18*n50/n163 + n123*n50) + n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + pow(alpha, -n12*n166 + n51)*n119*n12*n154/n163 + n155) + n106*n252*n74*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2)*(pow(alpha, -n12*n166 + n51)*n12*n154*n50/n163 + n128*n50) + n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + pow(alpha, -n166*n5 + n51)*n119*n154*n5/n163 + n161) + n107*n255*n74*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2)*(pow(alpha, -n166*n5 + n51)*n154*n5*n50/n163 + n130*n50) + n108*n74*xF[0]*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2)*(pow(alpha, -n1*n166 + n51)*n0*n154*n2*n23/n163 + n0*n2*n23*n53)/n221 + n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + pow(alpha, -n166*n6 + n51)*n119*n154*n6/n163 + n157) + n109*n74*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152)*(pow(alpha, -n166*n6 + n51)*n154*n50*n6/n163 + n50*n57*n6)/n223 + n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + pow(alpha, -n11*n166 + n51)*n11*n154*n23*n31/n163 + n114*n31*n38) - n121*n74*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2)*(pow(alpha, -n11*n166 + n51)*n11*n154*n50/n163 + n137*n50)/n228 + n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + pow(alpha, -n166*n9 + n51)*n154*n23*n31*n9/n163 + n113*n143) - n132*n74*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2)*(pow(alpha, -n166*n9 + n51)*n154*n50*n9/n163 + n129*n50)/n226 + n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, -n14*n166 + n51)*n14*n154*n23*n31/n163 + n115*n136) - n133*n74*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80)*(pow(alpha, -n14*n166 + n51)*n14*n154*n50/n163 + n14*n50*n65)/n231 - n138*n74*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75)*(pow(alpha, -n166*n17 + n51)*n154*n17*n50/n163 + n17*n50*n68)/n234 + n146*pow(n203, n24)*n74*(pow(alpha, -n1*n166 + n51)*n142*(-n25 + xPj*xTj)/(n163*n54) + n110*n142) + n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n10*n166 + n51)*n10*n119*n154/n163 + n135*n61) + n148*n74*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81)*(pow(alpha, -n10*n166 + n51)*n10*n154*n50/n163 + n144*n50)/n227 + n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + pow(alpha, -n166*n21 + n51)*n119*n154*n21/n163 + n31*n48*n72) + n149*n74*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78)*(pow(alpha, -n166*n21 + n51)*n154*n21*n50/n163 + n21*n50*n72)/n238 + n151*n74*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79)*(pow(alpha, -n166*n8 + n51)*n154*n50*n8/n163 + n140*n50)/n225 + pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + pow(alpha, -n166*n8 + n51)*n154*n23*n31*n8/n163 + n112*n134) + pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + pow(alpha, -n166*n18 + n51)*n154*n18*n23*n31/n163 + n118*n31*n45) - n268*n74*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77)*(pow(alpha, -n13*n166 + n51)*n13*n154*n50/n163 + n139*n50) + n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + pow(alpha, -n16*n166 + n51)*n154*n16*n23*n31/n163 + n116*n31*n43) - n270*n74*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2)*(pow(alpha, -n16*n166 + n51)*n154*n16*n50/n163 + n127*n50) + n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n17 + n51)*n119*n154*n17/n163 + n126*n68) + n272*n74*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82)*(pow(alpha, -n166*n19 + n51)*n154*n19*n50/n163 + n141*n50) + n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n13*n166 + n51)*n119*n13*n154/n163 + n122*n64) + n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n19 + n51)*n119*n154*n19/n163 + n131*n70) + n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + pow(alpha, -n166*n20 + n51)*n119*n154*n20/n163 + n158) + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375) - n0*n280 - n0*n377 + 4.0*n125*n2*n253*n301*n74 - 4.0*n146*n319*n74/n221) + pow(-n29*(1.0*n125*n2*n253*n74*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2) + 0.5*n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) - 0.5*n146*n74*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2)*(pow(alpha, -n1*n166 + n51)*n0*n154*n2*n23/n163 + n0*n2*n23*n53)/n221 + n298 - 0.5*xTj*(-n101*n74*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153)*(pow(alpha, -n166*n20 + n51)*n154*n20*n50/n163 + n145*n50)/n237 + n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + pow(alpha, -n15*n166 + n51)*n119*n15*n154/n163 + n162) + n103*n74*xF[3]*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2)*(pow(alpha, -n15*n166 + n51)*n15*n154*n50/n163 + n124*n50)/n232 + n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + pow(alpha, -n166*n7 + n51)*n119*n154*n7/n163 + n160) + n104*n254*n74*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76)*(pow(alpha, -n166*n7 + n51)*n154*n50*n7/n163 + n50*n58*n7) + n105*n249*n74*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2)*(pow(alpha, -n166*n18 + n51)*n154*n18*n50/n163 + n123*n50) + n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + pow(alpha, -n12*n166 + n51)*n119*n12*n154/n163 + n155) + n106*n252*n74*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2)*(pow(alpha, -n12*n166 + n51)*n12*n154*n50/n163 + n128*n50) + n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + pow(alpha, -n166*n5 + n51)*n119*n154*n5/n163 + n161) + n107*n255*n74*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2)*(pow(alpha, -n166*n5 + n51)*n154*n5*n50/n163 + n130*n50) + n108*n74*xF[0]*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2)*(pow(alpha, -n1*n166 + n51)*n0*n154*n2*n23/n163 + n0*n2*n23*n53)/n221 + n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + pow(alpha, -n166*n6 + n51)*n119*n154*n6/n163 + n157) + n109*n74*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152)*(pow(alpha, -n166*n6 + n51)*n154*n50*n6/n163 + n50*n57*n6)/n223 + n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + pow(alpha, -n11*n166 + n51)*n11*n154*n23*n31/n163 + n114*n31*n38) - n121*n74*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2)*(pow(alpha, -n11*n166 + n51)*n11*n154*n50/n163 + n137*n50)/n228 + n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + pow(alpha, -n166*n9 + n51)*n154*n23*n31*n9/n163 + n113*n143) - n132*n74*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2)*(pow(alpha, -n166*n9 + n51)*n154*n50*n9/n163 + n129*n50)/n226 + n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, -n14*n166 + n51)*n14*n154*n23*n31/n163 + n115*n136) - n133*n74*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80)*(pow(alpha, -n14*n166 + n51)*n14*n154*n50/n163 + n14*n50*n65)/n231 - n138*n74*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75)*(pow(alpha, -n166*n17 + n51)*n154*n17*n50/n163 + n17*n50*n68)/n234 + n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) + n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n10*n166 + n51)*n10*n119*n154/n163 + n135*n61) + n148*n74*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81)*(pow(alpha, -n10*n166 + n51)*n10*n154*n50/n163 + n144*n50)/n227 + n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + pow(alpha, -n166*n21 + n51)*n119*n154*n21/n163 + n31*n48*n72) + n149*n74*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78)*(pow(alpha, -n166*n21 + n51)*n154*n21*n50/n163 + n21*n50*n72)/n238 + n151*n74*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79)*(pow(alpha, -n166*n8 + n51)*n154*n50*n8/n163 + n140*n50)/n225 + pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + pow(alpha, -n166*n8 + n51)*n154*n23*n31*n8/n163 + n112*n134) + pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + pow(alpha, -n166*n18 + n51)*n154*n18*n23*n31/n163 + n118*n31*n45) - n268*n74*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77)*(pow(alpha, -n13*n166 + n51)*n13*n154*n50/n163 + n139*n50) + n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + pow(alpha, -n16*n166 + n51)*n154*n16*n23*n31/n163 + n116*n31*n43) - n270*n74*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2)*(pow(alpha, -n16*n166 + n51)*n154*n16*n50/n163 + n127*n50) + n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n17 + n51)*n119*n154*n17/n163 + n126*n68) + n272*n74*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82)*(pow(alpha, -n166*n19 + n51)*n154*n19*n50/n163 + n141*n50) + n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n13*n166 + n51)*n119*n13*n154/n163 + n122*n64) + n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n19 + n51)*n119*n154*n19/n163 + n131*n70) + n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + pow(alpha, -n166*n20 + n51)*n119*n154*n20/n163 + n158) + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375)) - n406, -n0);
23804 NP_sqrt_base = fabs(NP_sqrt_base);
23805 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
23806 NT1 = n120*(n164 - log(-pow(alpha, NP1*n1)*n154 + 1));
23807 g0 = MW[1] - Mstar;
23808 g1 = MW[0] - Mstar;
23811 g4 = MW[10] - Mstar;
23812 g5 = MW[11] - Mstar;
23813 g6 = MW[12] - Mstar;
23814 g7 = MW[13] - Mstar;
23815 g8 = MW[14] - Mstar;
23816 g9 = MW[15] - Mstar;
23817 g10 = MW[16] - Mstar;
23818 g11 = MW[17] - Mstar;
23819 g12 = MW[2] - Mstar;
23820 g13 = MW[3] - Mstar;
23821 g14 = MW[4] - Mstar;
23822 g15 = MW[5] - Mstar;
23823 g16 = MW[6] - Mstar;
23824 g17 = MW[7] - Mstar;
23825 g18 = MW[8] - Mstar;
23826 g19 = MW[9] - Mstar;
23833 g26 = pow(alpha, -g1);
23834 g27 = pow(alpha, -g4);
23835 g28 = pow(alpha, -g5);
23836 g29 = pow(alpha, -g6);
23837 g30 = pow(alpha, -g7);
23838 g31 = pow(alpha, -g8);
23839 g32 = pow(alpha, -g9);
23840 g33 = pow(alpha, -g10);
23841 g34 = pow(alpha, -g11);
23842 g35 = pow(alpha, -g0);
23843 g36 = pow(alpha, -g12);
23844 g37 = pow(alpha, -g13);
23845 g38 = pow(alpha, -g14);
23846 g39 = pow(alpha, -g15);
23847 g40 = pow(alpha, -g16);
23848 g41 = pow(alpha, -g17);
23849 g42 = pow(alpha, -g18);
23850 g43 = pow(alpha, -g19);
23851 g44 = log(xF[0]/xF[1]);
23853 g46 = pow(alpha, NP1*g0);
23854 g47 = pow(alpha, NP1*g1);
23855 g48 = pow(alpha, NP1*g4);
23857 g50 = pow(alpha, NP1*g5);
23858 g51 = pow(alpha, NP1*g6);
23859 g52 = pow(alpha, NP1*g7);
23860 g53 = pow(alpha, NP1*g8);
23861 g54 = pow(alpha, NP1*g9);
23862 g55 = pow(alpha, NP1*g10);
23863 g56 = pow(alpha, NP1*g11);
23864 g57 = pow(alpha, NP1*g12);
23865 g58 = pow(alpha, NP1*g13);
23866 g59 = pow(alpha, NP1*g14);
23867 g60 = pow(alpha, NP1*g15);
23868 g61 = pow(alpha, NP1*g16);
23869 g62 = pow(alpha, NP1*g17);
23870 g63 = pow(alpha, NP1*g18);
23871 g64 = pow(alpha, NP1*g19);
23913 g106 = g21/(g3*xF[1]);
23915 g108 = g104*xF[10];
23916 g109 = g104*xF[11];
23917 g110 = g104*xF[12];
23918 g111 = g104*xF[13];
23919 g112 = g104*xF[14];
23920 g113 = g104*xF[15];
23921 g114 = g104*xF[16];
23922 g115 = g104*xF[17];
23932 g125 = pow(alpha, g0*g45) - 1;
23933 g126 = pow(alpha, g0*g45) - 1;
23934 g127 = pow(alpha, g1*g45) - 1;
23935 g128 = pow(alpha, g4*g45) - 1;
23936 g129 = pow(alpha, g45*g5) - 1;
23937 g130 = pow(alpha, g45*g6) - 1;
23938 g131 = pow(alpha, g45*g7) - 1;
23939 g132 = pow(alpha, g45*g8) - 1;
23940 g133 = pow(alpha, g45*g9) - 1;
23941 g134 = pow(alpha, g10*g45) - 1;
23942 g135 = pow(alpha, g11*g45) - 1;
23943 g136 = pow(alpha, g12*g45) - 1;
23944 g137 = pow(alpha, g13*g45) - 1;
23945 g138 = pow(alpha, g14*g45) - 1;
23946 g139 = pow(alpha, g15*g45) - 1;
23947 g140 = pow(alpha, g16*g45) - 1;
23948 g141 = pow(alpha, g17*g45) - 1;
23949 g142 = pow(alpha, g18*g45) - 1;
23950 g143 = pow(alpha, g19*g45) - 1;
23951 g144 = -pow(alpha, g1*g45);
23952 g145 = -pow(alpha, g4*g45);
23953 g146 = -pow(alpha, g45*g5);
23954 g147 = -pow(alpha, g45*g6);
23955 g148 = -pow(alpha, g45*g7);
23956 g149 = -pow(alpha, g45*g8);
23957 g150 = -pow(alpha, g45*g9);
23958 g151 = -pow(alpha, g10*g45);
23959 g152 = -pow(alpha, g11*g45);
23960 g153 = -pow(alpha, g12*g45);
23961 g154 = -pow(alpha, g13*g45);
23962 g155 = -pow(alpha, g14*g45);
23963 g156 = -pow(alpha, g15*g45);
23964 g157 = -pow(alpha, g16*g45);
23965 g158 = -pow(alpha, g17*g45);
23966 g159 = -pow(alpha, g18*g45);
23967 g160 = -pow(alpha, g19*g45);
23969 g162 = -g144 - g47;
23970 g163 = -g145 - g48;
23971 g164 = -g146 - g50;
23972 g165 = -g147 - g51;
23973 g166 = -g148 - g52;
23974 g167 = -g149 - g53;
23975 g168 = -g150 - g54;
23976 g169 = -g151 - g55;
23977 g170 = -g152 - g56;
23978 g171 = -g153 - g57;
23979 g172 = -g154 - g58;
23980 g173 = -g155 - g59;
23981 g174 = -g156 - g60;
23982 g175 = -g157 - g61;
23983 g176 = -g158 - g62;
23984 g177 = -g159 - g63;
23985 g178 = -g160 - g64;
23986 g179 = pow(alpha, g1*g45) + g87;
23988 g181 = pow(alpha, g4*g45) + g88;
23989 g182 = pow(alpha, g45*g5) + g89;
23990 g183 = pow(alpha, g45*g6) + g90;
23991 g184 = pow(alpha, g45*g7) + g91;
23992 g185 = pow(alpha, g45*g8) + g92;
23993 g186 = pow(alpha, g45*g9) + g93;
23994 g187 = pow(alpha, g10*g45) + g94;
23995 g188 = pow(alpha, g11*g45) + g95;
23996 g189 = pow(alpha, g12*g45) + g96;
23997 g190 = pow(alpha, g13*g45) + g97;
23998 g191 = pow(alpha, g14*g45) + g98;
23999 g192 = pow(alpha, g15*g45) + g99;
24000 g193 = pow(alpha, g16*g45) + g100;
24001 g194 = pow(alpha, g17*g45) + g101;
24002 g195 = pow(alpha, g18*g45) + g102;
24003 g196 = pow(alpha, g19*g45) + g103;
24006 g199 = xF[11]/g182;
24008 g201 = xF[10]/g181;
24009 g202 = xF[17]/g188;
24010 g203 = xF[15]/g186;
24013 g206 = xF[12]/g183;
24014 g207 = xF[13]/g184;
24016 g209 = xF[14]/g185;
24021 g214 = xF[17]/g170;
24023 g216 = xF[16]/g169;
24025 g218 = xF[12]/g165;
24026 g219 = xF[15]/g168;
24029 g222 = xF[13]/g166;
24030 g223 = xF[11]/g164;
24034 g227 = xF[14]/g167;
24036 g229 = xF[10]/g163;
24125 g318 = log(g106*g180*g22/g69);
24126 g319 = log(g106*g161*g22/g68);
24127 g320 = log(g180*g25*g66/g126);
24129 g322 = log(g161*g25*g66/g125);
24167 g360 = g107 + g108 + g109 + g110 + g111 + g112 + g113 + g114 + g115 + g116 + g117 + g118 + g119 + g120 + g121 + g122 + g123 + g124;
24168 LpF = xF[0]*(g26 + 1.0)*(g327 + g349 + g65)/(g49*(g26 - 1.0)) + xF[10]*(g27 + 1.0)*(g337 + g357 + g65)/(g49*(g27 - 1.0)) + xF[11]*(g28 + 1.0)*(g335 + g346 + g65)/(g49*(g28 - 1.0)) + xF[12]*(g29 + 1.0)*(g325 + g343 + g65)/(g49*(g29 - 1.0)) + xF[13]*(g30 + 1.0)*(g333 + g347 + g65)/(g49*(g30 - 1.0)) + xF[14]*(g31 + 1.0)*(g336 + g353 + g65)/(g49*(g31 - 1.0)) + xF[15]*(g32 + 1.0)*(g330 + g344 + g65)/(g49*(g32 - 1.0)) + xF[16]*(g33 + 1.0)*(g334 + g342 + g65)/(g49*(g33 - 1.0)) + xF[17]*(g34 + 1.0)*(g339 + g351 + g65)/(g49*(g34 - 1.0)) + xF[1]*(g35 + 1.0)*(g340 + g356 + g65)/(g49*(g35 - 1.0)) + xF[2]*(g36 + 1.0)*(g331 + g350 + g65)/(g49*(g36 - 1.0)) + xF[3]*(g37 + 1.0)*(g338 + g348 + g65)/(g49*(g37 - 1.0)) + xF[4]*(g38 + 1.0)*(g324 + g359 + g65)/(g49*(g38 - 1.0)) + xF[5]*(g39 + 1.0)*(g328 + g352 + g65)/(g49*(g39 - 1.0)) + xF[6]*(g40 + 1.0)*(g329 + g345 + g65)/(g49*(g40 - 1.0)) + xF[7]*(g41 + 1.0)*(g341 + g358 + g65)/(g49*(g41 - 1.0)) + xF[8]*(g42 + 1.0)*(g332 + g354 + g65)/(g49*(g42 - 1.0)) + xF[9]*(g43 + 1.0)*(g326 + g355 + g65)/(g49*(g43 - 1.0));
24171 SWUpF = -g126*g200*g323 - g197*g321*(g103 + 1) - g197*g323*(pow(alpha, g19*g45) - 1) - g198*g321*(g102 + 1) - g198*g323*(pow(alpha, g18*g45) - 1) - g199*g321*(g89 + 1) - g199*g323*(pow(alpha, g45*g5) - 1) - g200*g321*g69 - g201*g321*(g88 + 1) - g201*g323*(pow(alpha, g4*g45) - 1) - g202*g321*(g95 + 1) - g202*g323*(pow(alpha, g11*g45) - 1) - g203*g321*(g93 + 1) - g203*g323*(pow(alpha, g45*g9) - 1) - g204*g321*(g97 + 1) - g204*g323*(pow(alpha, g13*g45) - 1) - g205*g321*(g101 + 1) - g205*g323*(pow(alpha, g17*g45) - 1) - g206*g321*(g90 + 1) - g206*g323*(pow(alpha, g45*g6) - 1) - g207*g321*(g91 + 1) - g207*g323*(pow(alpha, g45*g7) - 1) - g208*g321*(g100 + 1) - g208*g323*(pow(alpha, g16*g45) - 1) - g209*g321*(g92 + 1) - g209*g323*(pow(alpha, g45*g8) - 1) - g210*g321*(g99 + 1) - g210*g323*(pow(alpha, g15*g45) - 1) - g211*g321*(g96 + 1) - g211*g323*(pow(alpha, g12*g45) - 1) - g212*g321*(g87 + 1) - g212*g323*(pow(alpha, g1*g45) - 1) - g360 - g23*g318*(g98 + 1)/g191 - g23*g320*(pow(alpha, g14*g45) - 1)/g191 - g24*g318*(g94 + 1)/g187 - g24*g320*(pow(alpha, g10*g45) - 1)/g187;
24172 SWUpP = -g67*(g125*g246*g322 + g127*g232*g322 + g128*g243*g322 + g129*g240*g322 + g130*g233*g322 + g131*g236*g322 + g132*g239*g322 + g133*g234*g322 + g134*g231*g322 + g135*g242*g322 + g136*g237*g322 + g137*g245*g322 + g139*g238*g322 + g140*g235*g322 + g141*g247*g322 + g142*g241*g322 + g143*g244*g322 + g23*g324 + g23*g359 + g231*g319*g77 + g232*g319*g70 + g233*g319*g73 + g234*g319*g76 + g235*g319*g83 + g236*g319*g74 + g237*g319*g79 + g238*g319*g82 + g239*g319*g75 + g240*g319*g72 + g241*g319*g85 + g242*g319*g78 + g243*g319*g71 + g244*g319*g86 + g245*g319*g80 + g246*g319*g68 + g247*g319*g84 + g360);
24177 xP[4] = g138*g213*g67;
24195 xT[4] = g105*g213*g81;
24201 xT[10] = g105*g279;
24202 xT[11] = g105*g278;
24203 xT[12] = g105*g272;
24204 xT[13] = g105*g274;
24205 xT[14] = g105*g280;
24206 xT[15] = g105*g269;
24207 xT[16] = g105*g276;
24208 xT[17] = g105*g266;
24211 n0 = MW[0] - Mstar;
24215 n4 = MW[10] - Mstar;
24216 n5 = MW[11] - Mstar;
24217 n6 = MW[12] - Mstar;
24218 n7 = MW[13] - Mstar;
24219 n8 = MW[14] - Mstar;
24220 n9 = MW[15] - Mstar;
24221 n10 = MW[16] - Mstar;
24222 n11 = MW[17] - Mstar;
24223 n12 = MW[18] - Mstar;
24224 n13 = MW[1] - Mstar;
24225 n14 = MW[2] - Mstar;
24226 n15 = MW[3] - Mstar;
24227 n16 = MW[4] - Mstar;
24228 n17 = MW[5] - Mstar;
24229 n18 = MW[6] - Mstar;
24230 n19 = MW[7] - Mstar;
24231 n20 = MW[8] - Mstar;
24232 n21 = MW[9] - Mstar;
24240 n29 = pow(n0, -n23);
24241 n30 = pow(n1, -n23);
24242 n31 = pow(n4, -n23);
24243 n32 = pow(n5, -n23);
24244 n33 = pow(n6, -n23);
24245 n34 = pow(n7, -n23);
24246 n35 = pow(n8, -n23);
24247 n36 = pow(n9, -n23);
24248 n37 = pow(n10, -n23);
24249 n38 = pow(n11, -n23);
24250 n39 = pow(n12, -n23);
24251 n40 = pow(n13, -n23);
24252 n41 = pow(n14, -n23);
24253 n42 = pow(n15, -n23);
24254 n43 = pow(n16, -n23);
24255 n44 = pow(n17, -n23);
24256 n45 = pow(n18, -n23);
24257 n46 = pow(n19, -n23);
24258 n47 = pow(n20, -n23);
24259 n48 = pow(n21, -n23);
24262 n51 = pow(alpha, NP0*n0);
24263 n52 = n25 + n28*xF[0];
24264 n53 = n25 + n28*xPj;
24265 n54 = pow(alpha, NP0*n4);
24266 n55 = pow(alpha, NP0*n5);
24267 n56 = pow(alpha, NP0*n6);
24268 n57 = pow(alpha, NP0*n7);
24269 n58 = pow(alpha, NP0*n8);
24270 n59 = pow(alpha, NP0*n9);
24271 n60 = pow(alpha, NP0*n10);
24272 n61 = pow(alpha, NP0*n11);
24273 n62 = pow(alpha, NP0*n12);
24274 n63 = pow(alpha, NP0*n13);
24275 n64 = pow(alpha, NP0*n14);
24276 n65 = pow(alpha, NP0*n15);
24277 n66 = pow(alpha, NP0*n16);
24278 n67 = pow(alpha, NP0*n17);
24279 n68 = pow(alpha, NP0*n18);
24280 n69 = pow(alpha, NP0*n19);
24281 n70 = pow(alpha, NP0*n20);
24282 n71 = pow(alpha, NP0*n21);
24291 n80 = pow(alpha, NP0*n23*n24);
24292 n81 = pow(n52, -n23);
24293 n82 = pow(n53, -n23);
24362 n151 = log((-1.0 + xPj/xF[0])/n2);
24368 n157 = n1*n142*xF[12];
24370 n159 = n1*n141*xF[10];
24371 n160 = n30*n38*n61;
24372 n161 = n30*n32*n55;
24373 n162 = n30*n47*n70;
24374 n163 = n30*n37*n60;
24375 n164 = n30*n42*n65;
24376 n165 = n30*n33*n56;
24377 n166 = n30*n43*n66;
24378 n167 = n30*n31*n54;
24379 n168 = n30*n45*n68;
24380 n169 = n100*n156 + 1;
24381 n170 = pow(n169, -n23);
24382 n171 = n151 + n22 + n49 + n72;
24383 n172 = n124*n156/n169;
24384 n173 = n0*n156*n30*n51/n169;
24385 n174 = n111*(n171 - log(n169)) + 1;
24386 n175 = pow(alpha, n0*n174);
24387 n176 = pow(alpha, n174*n4);
24388 n177 = pow(alpha, n174*n5);
24389 n178 = pow(alpha, n174*n6);
24390 n179 = pow(alpha, n174*n7);
24391 n180 = pow(alpha, n174*n8);
24392 n181 = pow(alpha, n174*n9);
24393 n182 = pow(alpha, n10*n174);
24394 n183 = pow(alpha, n11*n174);
24395 n184 = pow(alpha, n12*n174);
24396 n185 = pow(alpha, n13*n174);
24397 n186 = pow(alpha, n14*n174);
24398 n187 = pow(alpha, n15*n174);
24399 n188 = pow(alpha, n16*n174);
24400 n189 = pow(alpha, n17*n174);
24401 n190 = pow(alpha, n174*n18);
24402 n191 = pow(alpha, n174*n19);
24403 n192 = pow(alpha, n174*n20);
24404 n193 = pow(alpha, n174*n21);
24423 n212 = pow(alpha, n174*n24) + n78 - 1;
24424 n213 = n79 - 1 + 1.0/n176;
24425 n214 = n83 - 1 + 1.0/n177;
24426 n215 = n84 - 1 + 1.0/n178;
24427 n216 = n85 - 1 + 1.0/n179;
24428 n217 = n86 - 1 + 1.0/n180;
24429 n218 = n87 - 1 + 1.0/n181;
24430 n219 = n88 - 1 + 1.0/n182;
24431 n220 = n89 - 1 + 1.0/n183;
24432 n221 = n90 - 1 + 1.0/n184;
24433 n222 = n91 - 1 + 1.0/n185;
24434 n223 = n92 - 1 + 1.0/n186;
24435 n224 = n93 - 1 + 1.0/n187;
24436 n225 = n94 - 1 + 1.0/n188;
24437 n226 = n95 - 1 + 1.0/n189;
24438 n227 = n96 - 1 + 1.0/n190;
24439 n228 = n97 - 1 + 1.0/n191;
24440 n229 = n98 - 1 + 1.0/n192;
24441 n230 = n99 - 1 + 1.0/n193;
24442 n231 = pow(n212, -n23);
24443 n232 = pow(n213, -n23);
24444 n233 = pow(n214, -n23);
24445 n234 = pow(n215, -n23);
24446 n235 = pow(n216, -n23);
24447 n236 = pow(n217, -n23);
24448 n237 = pow(n218, -n23);
24449 n238 = pow(n219, -n23);
24450 n239 = pow(n220, -n23);
24451 n240 = pow(n221, -n23);
24452 n241 = pow(n222, -n23);
24453 n242 = pow(n223, -n23);
24454 n243 = pow(n224, -n23);
24455 n244 = pow(n225, -n23);
24456 n245 = pow(n226, -n23);
24457 n246 = pow(n227, -n23);
24458 n247 = pow(n228, -n23);
24459 n248 = pow(n229, -n23);
24460 n249 = pow(n230, -n23);
24461 n250 = pow(n212, 3);
24462 n251 = pow(n213, 3);
24463 n252 = pow(n214, 3);
24464 n253 = pow(n215, 3);
24465 n254 = pow(n216, 3);
24466 n255 = pow(n217, 3);
24467 n256 = pow(n218, 3);
24468 n257 = pow(n219, 3);
24469 n258 = pow(n220, 3);
24470 n259 = pow(n221, 3);
24471 n260 = pow(n222, 3);
24472 n261 = pow(n223, 3);
24473 n262 = pow(n224, 3);
24474 n263 = pow(n225, 3);
24475 n264 = pow(n226, 3);
24476 n265 = pow(n227, 3);
24477 n266 = pow(n228, 3);
24478 n267 = pow(n229, 3);
24479 n268 = pow(n230, 3);
24480 n269 = xF[11]/n214;
24481 n270 = xF[17]/n220;
24482 n271 = xF[14]/n217;
24486 n275 = xF[16]/n219;
24488 n277 = xF[12]/n215;
24489 n278 = xF[10]/n213;
24492 n281 = xF[17]/n239;
24495 n284 = n67*xF[5]/n226;
24496 n285 = n63*xF[1]/n222;
24497 n286 = n62*xF[18]/n221;
24498 n287 = n69*xF[7]/n228;
24499 n288 = n57*xF[13]/n216;
24500 n289 = n64*xF[2]/n223;
24501 n290 = n59*xF[15]/n218;
24508 n297 = n90*xF[18]/n240;
24509 n298 = n91*xF[1]/n241;
24510 n299 = n94*xF[4]/n244;
24511 n300 = n89*xF[17]/n258;
24512 n301 = n90*xF[18]/n259;
24513 n302 = n98*xF[8]/n248;
24514 n303 = n276*n30*n48*n71;
24515 n304 = n0*n110*n113/n212;
24516 n305 = n110*n113*n24/n212;
24517 n306 = n110*n119*n73/n212;
24518 n307 = n167*n278*n73;
24519 n308 = n161*n269*n73;
24520 n309 = n165*n277*n73;
24521 n310 = n128*n288*n73;
24522 n311 = n149*n271*n58*n73;
24523 n312 = n134*n290*n73;
24524 n313 = n163*n275*n73;
24525 n314 = n160*n270*n73;
24526 n315 = n140*n286*n73;
24527 n316 = n137*n285*n73;
24528 n317 = n135*n289*n73;
24529 n318 = n164*n274*n73;
24530 n319 = n166*n272*n73;
24531 n320 = n117*n284*n73;
24532 n321 = n168*n279*n73;
24533 n322 = n125*n287*n73;
24534 n323 = n162*n273*n73;
24537 n326 = n156/(n169*n175);
24539 n328 = n0*n124 + n0*n172/n175;
24540 n329 = n1*n141 + n172*n209;
24541 n330 = n153 + n172*n203;
24542 n331 = n1*n142 + n172*n194;
24543 n332 = n156*n51*n75/(n169*n179) + n57*n75;
24544 n333 = n1*n122 + n172*n201;
24545 n334 = n156*n51*n77/(n169*n181) + n59*n77;
24546 n335 = n1*n138 + n172*n210;
24547 n336 = n154 + n172*n198;
24548 n337 = n156*n51*n74/(n169*n184) + n62*n74;
24549 n338 = n1*n139 + n172*n204;
24550 n339 = n156*n51*n76/(n169*n186) + n64*n76;
24551 n340 = n1*n114 + n172*n199;
24552 n341 = n118*n16 + n172*n206;
24553 n342 = n1*n145 + n172*n208;
24554 n343 = n155 + n172*n200;
24555 n344 = n1*n147 + n172*n196;
24556 n345 = n1*n136 + n172*n202;
24557 n346 = n1*n130 + n172*n197;
24558 n347 = pow(n328, -n23);
24559 n348 = pow(n329, -n23);
24560 n349 = pow(n330, -n23);
24561 n350 = pow(n331, -n23);
24562 n351 = pow(n332, -n23);
24563 n352 = pow(n333, -n23);
24564 n353 = pow(n334, -n23);
24565 n354 = pow(n335, -n23);
24566 n355 = pow(n336, -n23);
24567 n356 = pow(n337, -n23);
24568 n357 = pow(n338, -n23);
24569 n358 = pow(n339, -n23);
24570 n359 = pow(n340, -n23);
24571 n360 = pow(n341, -n23);
24572 n361 = pow(n342, -n23);
24573 n362 = pow(n343, -n23);
24574 n363 = pow(n344, -n23);
24575 n364 = pow(n345, -n23);
24576 n365 = pow(n346, -n23);
24577 n366 = n330*xF[11];
24581 n370 = n124*n23*n24 + n172*n23*n24/n175;
24582 n371 = n114*n50 + n156*n199*n50*n51/n169;
24583 n372 = n129*n50 + n156*n198*n50*n51/n169;
24584 n373 = n349*xF[11];
24587 n376 = n100*n119*n326 + n100*n119;
24612 n401 = n364*n98*xF[8]/n267;
24613 n402 = n109*n133*n379;
24614 n403 = n133*n376/n231;
24615 n404 = n110*n113*n23*n24*(pow(alpha, NP0*n0 + n174*n24)*n0*n1*n156/n169 + n0*n124)/n231;
24616 n405 = n141*n50*n73*xF[10]*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)/n232;
24617 n406 = n148*n50*n73*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)/n233;
24618 n407 = n142*n50*n73*xF[12]*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)/n234;
24619 n408 = n50*n57*n7*n73*xF[13]*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)/n235;
24620 n409 = n122*n50*n73*xF[14]*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)/n236;
24621 n410 = n150*n50*n73*xF[15]*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)/n237;
24622 n411 = n138*n50*n73*xF[16]*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)/n238;
24623 n412 = n129*n281*n50*n73*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154);
24624 n413 = n12*n50*n62*n73*xF[18]*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)/n240;
24625 n414 = n139*n50*n73*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)/n241;
24626 n415 = n14*n50*n64*n73*xF[2]*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)/n242;
24627 n416 = n114*n280*n50*n73*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114);
24628 n417 = n16*n50*n66*n73*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)/n244;
24629 n418 = n145*n50*n73*xF[5]*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)/n245;
24630 n419 = n158*n73*xF[6]*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)/n246;
24631 n420 = n147*n50*n73*xF[7]*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)/n247;
24632 n421 = n136*n50*n73*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)/n248;
24633 n422 = n130*n50*n73*xF[9]*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)/n249;
24634 n423 = 1.0*n0*n110*n113*n379;
24637 n426 = n304 + n402;
24638 n427 = n328*n370/n250;
24639 n428 = pow(alpha, n0*n27)*n0*n209*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n31*n82/(n170*n176*n81) + n167 + n173*n209;
24640 n429 = pow(alpha, n0*n27)*n0*n194*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n33*n82/(n170*n178*n81) + n165 + n173*n194;
24641 n430 = pow(alpha, n0*n27)*n128*n82/(n170*n179*n81) + pow(alpha, n0*n27)*n211*n24*n30*n82/(n170*n81) + n102*n128 + n156*n211*n24*n30*n51/n169;
24642 n431 = pow(alpha, n0*n27)*n149*n82/(n170*n180*n81) + pow(alpha, n0*n27)*n201*n24*n30*n82/(n170*n81) + n103*n149 + n156*n201*n24*n30*n51/n169;
24643 n432 = pow(alpha, n0*n27)*n0*n207*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n134*n82/(n170*n181*n81) + n134*n59 + n173*n207;
24644 n433 = pow(alpha, n0*n27)*n210*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27)*n30*n37*n82/(n170*n182*n81) + n104*n30*n37 + n156*n210*n24*n30*n51/n169;
24645 n434 = pow(alpha, n0*n27)*n0*n198*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n38*n82/(n170*n183*n81) + n160 + n173*n198;
24646 n435 = pow(alpha, n0*n27)*n135*n82/(n170*n186*n81) + pow(alpha, n0*n27)*n205*n24*n30*n82/(n170*n81) + n106*n135 + n156*n205*n24*n30*n51/n169;
24647 n436 = pow(alpha, n0*n27)*n0*n199*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n42*n82/(n170*n187*n81) + n164 + n173*n199;
24648 n437 = pow(alpha, n0*n27)*n200*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27)*n30*n45*n82/(n170*n190*n81) + n108*n30*n45 + n156*n200*n24*n30*n51/n169;
24649 n438 = pow(alpha, n0*n27)*n0*n197*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n48*n82/(n170*n193*n81) + n173*n197 + n30*n48*n71;
24650 n439 = n132*n73*(pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128 + n156*n211*n24*n30*n51/n169)/n235;
24651 n440 = n126*n73*(pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149 + n156*n201*n24*n30*n51/n169)/n236;
24652 n441 = n112*n73*(pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37 + n156*n210*n24*n30*n51/n169)/n238;
24653 n442 = n297*n73*(pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140 + n156*n195*n24*n30*n51/n169);
24654 n443 = n127*n73*(pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135 + n156*n205*n24*n30*n51/n169)/n242;
24655 n444 = n299*n73*(pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43 + n156*n206*n24*n30*n51/n169);
24656 n445 = n121*n73*(pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45 + n156*n200*n24*n30*n51/n169)/n246;
24657 n446 = n109*n131*(pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167 + n173*n209)/n232;
24658 n447 = n109*n294*xF[11]*(pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161 + n173*n203);
24659 n448 = n109*n143*(pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165 + n173*n194)/n234;
24660 n449 = n109*n116*(pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59 + n173*n207)/n237;
24661 n450 = n109*n281*n89*(pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160 + n173*n198);
24662 n451 = n109*n298*(pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63 + n173*n204);
24663 n452 = n109*n115*(pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164 + n173*n199)/n243;
24664 n453 = n109*n296*(pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67 + n173*n208);
24665 n454 = n109*n123*(pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69 + n173*n196)/n247;
24666 n455 = n109*n302*(pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162 + n173*n202);
24667 n456 = n109*n120*(pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n173*n197 + n30*n48*n71)/n249;
24668 n457 = n325 + n423 + n425;
24669 n458 = n109*n112*n386 + n109*n115*n340/n243 + n109*n116*n385 + n109*n120*n381 + n109*n121*n343/n246 + n109*n123*n387 + n109*n126*n384 + n109*n127*n380 + n109*n131*n382 + n109*n132*n383 + n109*n143*n378 + n109*n281*n377 + n109*n294*n366 + n109*n296*n342 + n109*n297*n337 + n109*n298*n338 + n109*n299*n341 + n109*n302*n345 + n113*n114*n274 + n113*n122*n271 + n113*n129*n270 + n113*n130*n276 + n113*n136*n273 + n113*n138*n275 + n113*n139*xF[1]/n222 + n113*n141*n278 + n113*n142*n277 + n113*n145*xF[5]/n226 + n113*n146*n279 + n113*n147*xF[7]/n228 + n113*n148*n269 + n113*n16*n272*n66 + n286*n73*n74 + n288*n73*n75 + n289*n73*n76 + n290*n73*n77 + n426;
24670 n459 = n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422 + n424 + n439 + n440 + n441 + n442 + n443 + n444 + n445 + n446 + n447 + n448 + n449 + n450 + n451 + n452 + n453 + n454 + n455 + n456;
24671 n460 = n109*n112*n335*(n138*n50 + n156*n210*n50*n51/n169)/n257 + n109*n115*n340*n371/n262 + n109*n116*n334*(n150*n50 + n156*n207*n50*n51/n169)/n256 + n109*n120*n346*(n130*n50 + n156*n197*n50*n51/n169)/n268 + n109*n121*n343*(n156*n200*n50*n51/n169 + n158)/n265 + n109*n123*n344*(n147*n50 + n156*n196*n50*n51/n169)/n266 + n109*n126*n333*(n122*n50 + n156*n201*n50*n51/n169)/n255 + n109*n127*n339*(n14*n50*n64 + n156*n205*n50*n51/n169)/n261 + n109*n131*n329*(n141*n50 + n156*n209*n50*n51/n169)/n251 + n109*n132*n332*(n156*n211*n50*n51/n169 + n50*n57*n7)/n254 + n109*n133*n427 + n109*n143*n331*(n142*n50 + n156*n194*n50*n51/n169)/n253 + n109*n144*n342*(n145*n50 + n156*n208*n50*n51/n169)/n264 + n109*n291*n366*(n148*n50 + n156*n203*n50*n51/n169) + n109*n292*n367*(n139*n50 + n156*n204*n50*n51/n169) + n109*n295*n368*(n156*n206*n50*n51/n169 + n16*n50*n66) + n109*n300*n336*n372 + n109*n301*n337*(n12*n50*n62 + n156*n195*n50*n51/n169) + n109*n369*n98*(n136*n50 + n156*n202*n50*n51/n169)/n267 + n459;
24672 NP_b = -n0*n110*n113*n293*n327 - n27*(1.0*n0*n110*n113*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)/n231 - 1.0*n133*n395*n73 + 0.5*n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n325 - 0.5*xTj*(n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n0*n15*n156*n30/n169 + pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n0*n156*n30*n9/n169 + pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n0*n156*n21*n30/n169 + pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n30*n48*n71)/n249 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n0*n156*n19*n30/n169 + pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69)/n247 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n0*n156*n30*n4/n169 + pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167)/n232 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n0*n156*n30*n6/n169 + pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165)/n234 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n0*n11*n156*n30/n169 + pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n0*n156*n30*n5/n169 + pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n0*n156*n17*n30/n169 + pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n0*n13*n156*n30/n169 + pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n0*n156*n20*n30/n169 + pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162) + n112*n23*n400*n73 + n112*n73*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n24*n30/n169 + pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37)/n238 + n115*n23*n388*n73 + n116*n23*n391*n73 + n120*n23*n389*n73 + n121*n23*n390*n73 + n121*n73*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n24*n30/n169 + pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45)/n246 + n123*n23*n394*n73 + n126*n23*n393*n73 + n126*n73*(pow(alpha, NP0*n0 - n174*n8)*n156*n24*n30*n8/n169 + pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149)/n236 + n127*n23*n396*n73 + n127*n73*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n24*n30/n169 + pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135)/n242 + n131*n23*n399*n73 + n132*n23*n392*n73 + n132*n73*(pow(alpha, NP0*n0 - n174*n7)*n156*n24*n30*n7/n169 + pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128)/n235 + n133*n23*n395*n73 + n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n143*n23*n397*n73 + n144*n23*n398*n73 + n23*n291*n373*n73 + n23*n292*n374*n73 + n23*n295*n375*n73 + n23*n300*n355*n73 + n23*n301*n356*n73 + n23*n401*n73 + n297*n73*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n24*n30/n169 + pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140) + n299*n73*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n24*n30/n169 + pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43) + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422)) - n305 - n73*xTj*(n1*n114*n274 + n1*n122*n271 + n1*n130*n276 + n1*n136*n273 + n1*n138*n275 + n1*n139*xF[1]/n222 + n1*n145*xF[5]/n226 + n1*n147*xF[7]/n228 + n110*n283 - n112*n386 - n115*n340/n243 - n116*n385 + n118*n16*n272 - n120*n381 - n121*n343/n246 + n123*n282*n344 - n126*n384 - n127*n380 - n131*n382 - n132*n383 - n133*n379 + n152*n378 + n153*n269 + n154*n270 + n155*n279 + n157/n215 + n159/n213 - n281*n377 + n286*n74 + n288*n75 + n289*n76 + n290*n77 - n294*n366 - n296*n342 - n297*n337 - n298*n338 - n299*n341 - n302*n345);
24673 NP_2a = -n73*(-pow(alpha, n0*n27)*n119*n133*n23*pow(n327, -n23)/n250 - 2.0*pow(alpha, n0*n27)*n119*n327*xF[0]/n231 + n100*n119*n133*(-1 + (-n25 + xPj*xTj)/(n169*n175*n52))/n231 - 1.0*n110*n119/n212 + 1.0*xTj*(n1*n110*n23*n24*(pow(alpha, NP0*n0 + n174*n24)*n0*n1*n156/n169 + n0*n124)/n231 + n110*n119/n212 + n112*n23*n400 + n112*(pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37 + n156*n210*n24*n30*n51/n169)/n238 + n114*n280*n50*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114) + n115*n23*n388 - n115*(pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164 + n173*n199)/n243 + n116*n23*n391 - n116*(pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59 + n173*n207)/n237 + n117*n284 + n12*n50*n62*xF[18]*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)/n240 + n120*n23*n389 - n120*(pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n173*n197 + n30*n48*n71)/n249 + n121*n23*n390 + n121*(pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45 + n156*n200*n24*n30*n51/n169)/n246 + n122*n50*xF[14]*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)/n236 + n123*n23*n394 + n123*n282*(pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69 + n173*n196) + n125*n287 + n126*n23*n393 + n126*(pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149 + n156*n201*n24*n30*n51/n169)/n236 + n127*n23*n396 + n127*(pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135 + n156*n205*n24*n30*n51/n169)/n242 + n128*n288 + n129*n281*n50*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154) + n130*n50*xF[9]*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)/n249 + n131*n23*n399 - n131*(pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167 + n173*n209)/n232 + n132*n23*n392 + n132*(pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128 + n156*n211*n24*n30*n51/n169)/n235 + n133*n23*n395 + n134*n290 + n135*n289 + n136*n50*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)/n248 + n137*n285 + n138*n50*xF[16]*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)/n238 + n139*n50*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)/n241 + n14*n50*n64*xF[2]*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)/n242 + n140*n286 + n141*n50*xF[10]*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)/n232 + n142*n50*xF[12]*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)/n234 + n143*n23*n397 + n144*n23*n398 + n145*n50*xF[5]*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)/n245 + n147*n50*xF[7]*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)/n247 + n148*n50*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)/n233 + n149*n271*n58 + n150*n50*xF[15]*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)/n237 + n152*(pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165 + n173*n194)/n234 + n158*xF[6]*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)/n246 + n16*n50*n66*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)/n244 + n160*n270 + n161*n269 + n162*n273 + n163*n275 + n164*n274 + n165*n277 + n166*n272 + n167*n278 + n168*n279 + n23*n291*n373 + n23*n292*n374 + n23*n295*n375 + n23*n300*n355 + n23*n301*n356 + n23*n401 - n281*n89*(pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160 + n173*n198) + n294*xF[11]*(pow(alpha, n0*n27 - n174*n5)*n24*n30*n5*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n101*n30*n32 + n156*n203*n24*n30*n51/n169) - n296*(pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67 + n173*n208) + n297*(pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140 + n156*n195*n24*n30*n51/n169) - n298*(pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63 + n173*n204) + n299*(pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43 + n156*n206*n24*n30*n51/n169) - n302*(pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162 + n173*n202) + n303 + n403 + n50*n57*n7*xF[13]*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)/n235));
24674 NP_sqrt_base = (NP0*(n28*(n109*n112*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)/n238 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)/n249 + n109*n121*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)/n246 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)/n247 + n109*n126*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)/n236 + n109*n127*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)/n242 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)/n232 + n109*n132*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)/n235 + n109*n133*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)/n231 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)/n234 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145) + n109*n297*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139) + n109*n299*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136) + n113*n114*n274 + n113*n122*n271 + n113*n129*n270 + n113*n130*n276 + n113*n136*n273 + n113*n138*n275 + n113*n139*xF[1]/n222 + n113*n141*n278 + n113*n142*n277 + n113*n145*xF[5]/n226 + n113*n146*n279 + n113*n147*xF[7]/n228 + n113*n148*n269 + n113*n16*n272*n66 + n286*n73*n74 + n288*n73*n75 + n289*n73*n76 + n290*n73*n77 + n304) + n426) + n133*n73/n212 + xTj*(n109*n112/n219 + n109*n115/n224 + n109*n116/n218 + n109*n120/n230 + n109*n121/n227 + n109*n123/n228 + n109*n126/n217 + n109*n127/n223 + n109*n131/n213 + n109*n132/n216 + n109*n133/n212 + n109*n143/n215 + n109*n144/n226 + n109*n269*n83 + n109*n270*n89 + n109*n272*n94 + n109*n273*n98 + n109*n91*xF[1]/n222 + n109*n90*xF[18]/n221) + pow(NP0, -n23)*(-1.0*n0*n110*n113*n379 + 0.5*n133*n427*n73 - 0.5*n306 - 0.5*n424 + 0.5*n460*xTj))*(4.0*n0*n110*n113*n379 - 4.0*n133*n395*n73 - n23*n28*(n109*n112*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n50/n169 + n138*n50)/n257 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114)*(pow(alpha, NP0*n0 - n15*n174)*n15*n156*n50/n169 + n114*n50)/n262 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n0*n15*n156*n30/n169 + pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)*(pow(alpha, NP0*n0 - n174*n9)*n156*n50*n9/n169 + n150*n50)/n256 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n0*n156*n30*n9/n169 + pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)*(pow(alpha, NP0*n0 - n174*n21)*n156*n21*n50/n169 + n130*n50)/n268 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n0*n156*n21*n30/n169 + pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n30*n48*n71)/n249 + n109*n121*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n50/n169 + n158)/n265 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)*(pow(alpha, NP0*n0 - n174*n19)*n156*n19*n50/n169 + n147*n50)/n266 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n0*n156*n19*n30/n169 + pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69)/n247 + n109*n126*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)*(pow(alpha, NP0*n0 - n174*n8)*n156*n50*n8/n169 + n122*n50)/n255 + n109*n127*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n50/n169 + n14*n50*n64)/n261 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)*(pow(alpha, NP0*n0 - n174*n4)*n156*n4*n50/n169 + n141*n50)/n251 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n0*n156*n30*n4/n169 + pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167)/n232 + n109*n132*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)*(pow(alpha, NP0*n0 - n174*n7)*n156*n50*n7/n169 + n50*n57*n7)/n254 + n109*n133*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)*(pow(alpha, NP0*n0 - n0*n174)*n1*n156*n23*n24/n169 + n124*n23*n24)/n250 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)*(pow(alpha, NP0*n0 - n174*n6)*n156*n50*n6/n169 + n142*n50)/n253 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n0*n156*n30*n6/n169 + pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165)/n234 + n109*n144*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)*(pow(alpha, NP0*n0 - n17*n174)*n156*n17*n50/n169 + n145*n50)/n264 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n0*n11*n156*n30/n169 + pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160) + n109*n291*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)*(pow(alpha, NP0*n0 - n174*n5)*n156*n5*n50/n169 + n148*n50) + n109*n292*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)*(pow(alpha, NP0*n0 - n13*n174)*n13*n156*n50/n169 + n139*n50) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n0*n156*n30*n5/n169 + pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161) + n109*n295*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n50/n169 + n16*n50*n66) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n0*n156*n17*n30/n169 + pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n0*n13*n156*n30/n169 + pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63) + n109*n300*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154)*(pow(alpha, NP0*n0 - n11*n174)*n11*n156*n50/n169 + n129*n50) + n109*n301*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n50/n169 + n12*n50*n62) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n0*n156*n20*n30/n169 + pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162) + n109*n98*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)*(pow(alpha, NP0*n0 - n174*n20)*n156*n20*n50/n169 + n136*n50)/n267 + n112*n73*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n24*n30/n169 + pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37)/n238 + n121*n73*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n24*n30/n169 + pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45)/n246 + n126*n73*(pow(alpha, NP0*n0 - n174*n8)*n156*n24*n30*n8/n169 + pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149)/n236 + n127*n73*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n24*n30/n169 + pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135)/n242 + n132*n73*(pow(alpha, NP0*n0 - n174*n7)*n156*n24*n30*n7/n169 + pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128)/n235 + n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n297*n73*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n24*n30/n169 + pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140) + n299*n73*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n24*n30/n169 + pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43) + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422) + 2.0*n306 + 2.0*n424) + pow(-n133*n379*n73 - n27*(1.0*n0*n110*n113*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)/n231 - 0.5*n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)*(pow(alpha, NP0*n0 - n0*n174)*n1*n156*n23*n24/n169 + n124*n23*n24)/n250 + 0.5*n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n325 - 0.5*xTj*(n109*n112*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n50/n169 + n138*n50)/n257 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114)*(pow(alpha, NP0*n0 - n15*n174)*n15*n156*n50/n169 + n114*n50)/n262 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n0*n15*n156*n30/n169 + pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)*(pow(alpha, NP0*n0 - n174*n9)*n156*n50*n9/n169 + n150*n50)/n256 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n0*n156*n30*n9/n169 + pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)*(pow(alpha, NP0*n0 - n174*n21)*n156*n21*n50/n169 + n130*n50)/n268 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n0*n156*n21*n30/n169 + pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n30*n48*n71)/n249 + n109*n121*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n50/n169 + n158)/n265 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)*(pow(alpha, NP0*n0 - n174*n19)*n156*n19*n50/n169 + n147*n50)/n266 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n0*n156*n19*n30/n169 + pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69)/n247 + n109*n126*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)*(pow(alpha, NP0*n0 - n174*n8)*n156*n50*n8/n169 + n122*n50)/n255 + n109*n127*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n50/n169 + n14*n50*n64)/n261 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)*(pow(alpha, NP0*n0 - n174*n4)*n156*n4*n50/n169 + n141*n50)/n251 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n0*n156*n30*n4/n169 + pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167)/n232 + n109*n132*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)*(pow(alpha, NP0*n0 - n174*n7)*n156*n50*n7/n169 + n50*n57*n7)/n254 + n109*n133*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)*(pow(alpha, NP0*n0 - n0*n174)*n1*n156*n23*n24/n169 + n124*n23*n24)/n250 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)*(pow(alpha, NP0*n0 - n174*n6)*n156*n50*n6/n169 + n142*n50)/n253 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n0*n156*n30*n6/n169 + pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165)/n234 + n109*n144*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)*(pow(alpha, NP0*n0 - n17*n174)*n156*n17*n50/n169 + n145*n50)/n264 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n0*n11*n156*n30/n169 + pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160) + n109*n291*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)*(pow(alpha, NP0*n0 - n174*n5)*n156*n5*n50/n169 + n148*n50) + n109*n292*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)*(pow(alpha, NP0*n0 - n13*n174)*n13*n156*n50/n169 + n139*n50) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n0*n156*n30*n5/n169 + pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161) + n109*n295*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n50/n169 + n16*n50*n66) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n0*n156*n17*n30/n169 + pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n0*n13*n156*n30/n169 + pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63) + n109*n300*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154)*(pow(alpha, NP0*n0 - n11*n174)*n11*n156*n50/n169 + n129*n50) + n109*n301*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n50/n169 + n12*n50*n62) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n0*n156*n20*n30/n169 + pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162) + n109*n98*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)*(pow(alpha, NP0*n0 - n174*n20)*n156*n20*n50/n169 + n136*n50)/n267 + n112*n73*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n24*n30/n169 + pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37)/n238 + n121*n73*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n24*n30/n169 + pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45)/n246 + n126*n73*(pow(alpha, NP0*n0 - n174*n8)*n156*n24*n30*n8/n169 + pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149)/n236 + n127*n73*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n24*n30/n169 + pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135)/n242 + n132*n73*(pow(alpha, NP0*n0 - n174*n7)*n156*n24*n30*n7/n169 + pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128)/n235 + n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n297*n73*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n24*n30/n169 + pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140) + n299*n73*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n24*n30/n169 + pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43) + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422)) - n305 - n458*xTj, -n23);
24675 NP_sqrt_base = fabs(NP_sqrt_base);
24676 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
24677 NT1 = n111*(n171 - log(-pow(alpha, NP1*n0)*n156 + 1));
24678 g0 = MW[1] - Mstar;
24679 g1 = MW[0] - Mstar;
24682 g4 = MW[10] - Mstar;
24683 g5 = MW[11] - Mstar;
24684 g6 = MW[12] - Mstar;
24685 g7 = MW[13] - Mstar;
24686 g8 = MW[14] - Mstar;
24687 g9 = MW[15] - Mstar;
24688 g10 = MW[16] - Mstar;
24689 g11 = MW[17] - Mstar;
24690 g12 = MW[18] - Mstar;
24691 g13 = MW[2] - Mstar;
24692 g14 = MW[3] - Mstar;
24693 g15 = MW[4] - Mstar;
24694 g16 = MW[5] - Mstar;
24695 g17 = MW[6] - Mstar;
24696 g18 = MW[7] - Mstar;
24697 g19 = MW[8] - Mstar;
24698 g20 = MW[9] - Mstar;
24703 g25 = pow(alpha, -g1);
24704 g26 = pow(alpha, -g4);
24705 g27 = pow(alpha, -g5);
24706 g28 = pow(alpha, -g6);
24707 g29 = pow(alpha, -g7);
24708 g30 = pow(alpha, -g8);
24709 g31 = pow(alpha, -g9);
24710 g32 = pow(alpha, -g10);
24711 g33 = pow(alpha, -g11);
24712 g34 = pow(alpha, -g12);
24713 g35 = pow(alpha, -g0);
24714 g36 = pow(alpha, -g13);
24715 g37 = pow(alpha, -g14);
24716 g38 = pow(alpha, -g15);
24717 g39 = pow(alpha, -g16);
24718 g40 = pow(alpha, -g17);
24719 g41 = pow(alpha, -g18);
24720 g42 = pow(alpha, -g19);
24721 g43 = pow(alpha, -g20);
24722 g44 = log(xF[0]/xF[1]);
24724 g46 = pow(alpha, NP1*g0);
24725 g47 = pow(alpha, NP1*g1);
24726 g48 = pow(alpha, NP1*g4);
24728 g50 = pow(alpha, NP1*g5);
24729 g51 = pow(alpha, NP1*g6);
24730 g52 = pow(alpha, NP1*g7);
24731 g53 = pow(alpha, NP1*g8);
24732 g54 = pow(alpha, NP1*g9);
24733 g55 = pow(alpha, NP1*g10);
24734 g56 = pow(alpha, NP1*g11);
24735 g57 = pow(alpha, NP1*g12);
24736 g58 = pow(alpha, NP1*g13);
24737 g59 = pow(alpha, NP1*g14);
24738 g60 = pow(alpha, NP1*g15);
24739 g61 = pow(alpha, NP1*g16);
24740 g62 = pow(alpha, NP1*g17);
24741 g63 = pow(alpha, NP1*g18);
24742 g64 = pow(alpha, NP1*g19);
24743 g65 = pow(alpha, NP1*g20);
24787 g109 = g22/(g3*xF[1]);
24788 g110 = pow(alpha, g0*g45) - 1;
24789 g111 = pow(alpha, g0*g45) - 1;
24790 g112 = pow(alpha, g1*g45) - 1;
24791 g113 = pow(alpha, g13*g45) - 1;
24792 g114 = pow(alpha, g14*g45) - 1;
24793 g115 = pow(alpha, g15*g45) - 1;
24794 g116 = pow(alpha, g16*g45) - 1;
24795 g117 = pow(alpha, g17*g45) - 1;
24796 g118 = pow(alpha, g18*g45) - 1;
24797 g119 = pow(alpha, g19*g45) - 1;
24798 g120 = pow(alpha, g20*g45) - 1;
24799 g121 = pow(alpha, g4*g45) - 1;
24800 g122 = pow(alpha, g45*g5) - 1;
24801 g123 = pow(alpha, g45*g6) - 1;
24802 g124 = pow(alpha, g45*g7) - 1;
24803 g125 = pow(alpha, g45*g8) - 1;
24804 g126 = pow(alpha, g45*g9) - 1;
24805 g127 = pow(alpha, g10*g45) - 1;
24806 g128 = pow(alpha, g11*g45) - 1;
24807 g129 = pow(alpha, g12*g45) - 1;
24808 g130 = -pow(alpha, g1*g45);
24809 g131 = -pow(alpha, g4*g45);
24810 g132 = -pow(alpha, g45*g5);
24811 g133 = -pow(alpha, g45*g6);
24812 g134 = -pow(alpha, g45*g7);
24813 g135 = -pow(alpha, g45*g8);
24814 g136 = -pow(alpha, g45*g9);
24815 g137 = -pow(alpha, g10*g45);
24816 g138 = -pow(alpha, g11*g45);
24817 g139 = -pow(alpha, g12*g45);
24818 g140 = -pow(alpha, g13*g45);
24819 g141 = -pow(alpha, g14*g45);
24820 g142 = -pow(alpha, g15*g45);
24821 g143 = -pow(alpha, g16*g45);
24822 g144 = -pow(alpha, g17*g45);
24823 g145 = -pow(alpha, g18*g45);
24824 g146 = -pow(alpha, g19*g45);
24825 g147 = -pow(alpha, g20*g45);
24827 g149 = -g130 - g47;
24828 g150 = -g131 - g48;
24829 g151 = -g132 - g50;
24830 g152 = -g133 - g51;
24831 g153 = -g134 - g52;
24832 g154 = -g135 - g53;
24833 g155 = -g136 - g54;
24834 g156 = -g137 - g55;
24835 g157 = -g138 - g56;
24836 g158 = -g139 - g57;
24837 g159 = -g140 - g58;
24838 g160 = -g141 - g59;
24839 g161 = -g142 - g60;
24840 g162 = -g143 - g61;
24841 g163 = -g144 - g62;
24842 g164 = -g145 - g63;
24843 g165 = -g146 - g64;
24844 g166 = -g147 - g65;
24845 g167 = pow(alpha, g1*g45) + g89;
24847 g169 = pow(alpha, g4*g45) + g90;
24848 g170 = pow(alpha, g45*g5) + g91;
24849 g171 = pow(alpha, g45*g6) + g92;
24850 g172 = pow(alpha, g45*g7) + g93;
24851 g173 = pow(alpha, g45*g8) + g94;
24852 g174 = pow(alpha, g45*g9) + g95;
24853 g175 = pow(alpha, g10*g45) + g96;
24854 g176 = pow(alpha, g11*g45) + g97;
24855 g177 = pow(alpha, g12*g45) + g98;
24856 g178 = pow(alpha, g13*g45) + g99;
24857 g179 = pow(alpha, g14*g45) + g100;
24858 g180 = pow(alpha, g15*g45) + g101;
24859 g181 = pow(alpha, g16*g45) + g102;
24860 g182 = pow(alpha, g17*g45) + g103;
24861 g183 = pow(alpha, g18*g45) + g104;
24862 g184 = pow(alpha, g19*g45) + g105;
24863 g185 = pow(alpha, g20*g45) + g106;
24868 g190 = xF[10]/g169;
24869 g191 = xF[17]/g176;
24870 g192 = xF[15]/g174;
24871 g193 = xF[16]/g175;
24874 g196 = xF[12]/g171;
24875 g197 = xF[13]/g172;
24876 g198 = xF[11]/g170;
24878 g200 = xF[14]/g173;
24881 g203 = xF[18]/g177;
24883 g205 = xF[17]/g157;
24885 g207 = xF[15]/g155;
24888 g210 = xF[11]/g151;
24889 g211 = xF[18]/g158;
24891 g213 = xF[13]/g153;
24892 g214 = xF[16]/g156;
24895 g217 = xF[14]/g154;
24897 g219 = xF[12]/g152;
24898 g220 = xF[10]/g150;
24940 g262 = log(g109*g168*g23/g70);
24941 g263 = log(g109*g148*g23/g69);
24942 g264 = log(g168*g24*g67/g111);
24944 g266 = log(g148*g24*g67/g110);
24946 g268 = -g107*xF[0] - g107*xF[10] - g107*xF[11] - g107*xF[12] - g107*xF[13] - g107*xF[14] - g107*xF[15] - g107*xF[16] - g107*xF[17] - g107*xF[18] - g107*xF[1] - g107*xF[2] - g107*xF[3] - g107*xF[4] - g107*xF[5] - g107*xF[6] - g107*xF[7] - g107*xF[8] - g107*xF[9] - g111*g188*g267 - g186*g265*(g106 + 1) - g186*g267*(pow(alpha, g20*g45) - 1) - g187*g265*(g105 + 1) - g187*g267*(pow(alpha, g19*g45) - 1) - g188*g265*g70 - g189*g265*(g100 + 1) - g189*g267*(pow(alpha, g14*g45) - 1) - g190*g265*(g90 + 1) - g190*g267*(pow(alpha, g4*g45) - 1) - g191*g265*(g97 + 1) - g191*g267*(pow(alpha, g11*g45) - 1) - g192*g265*(g95 + 1) - g192*g267*(pow(alpha, g45*g9) - 1) - g193*g265*(g96 + 1) - g193*g267*(pow(alpha, g10*g45) - 1) - g194*g265*(g104 + 1) - g194*g267*(pow(alpha, g18*g45) - 1) - g195*g265*(g101 + 1) - g195*g267*(pow(alpha, g15*g45) - 1) - g196*g265*(g92 + 1) - g196*g267*(pow(alpha, g45*g6) - 1) - g197*g265*(g93 + 1) - g197*g267*(pow(alpha, g45*g7) - 1) - g198*g265*(g91 + 1) - g198*g267*(pow(alpha, g45*g5) - 1) - g199*g265*(g103 + 1) - g199*g267*(pow(alpha, g17*g45) - 1) - g200*g265*(g94 + 1) - g200*g267*(pow(alpha, g45*g8) - 1) - g201*g265*(g102 + 1) - g201*g267*(pow(alpha, g16*g45) - 1) - g202*g265*(g99 + 1) - g202*g267*(pow(alpha, g13*g45) - 1) - g203*g265*(g98 + 1) - g203*g267*(pow(alpha, g12*g45) - 1) - g204*g265*(g89 + 1) - g204*g267*(pow(alpha, g1*g45) - 1);
24947 LpF = xF[0]*(g25 + 1.0)*(g230*g263 + g243*g266 + g66)/(g49*(g25 - 1.0)) + xF[10]*(g26 + 1.0)*(g239*g263 + g260*g266 + g66)/(g49*(g26 - 1.0)) + xF[11]*(g27 + 1.0)*(g237*g263 + g245*g266 + g66)/(g49*(g27 - 1.0)) + xF[12]*(g28 + 1.0)*(g224*g263 + g256*g266 + g66)/(g49*(g28 - 1.0)) + xF[13]*(g29 + 1.0)*(g234*g263 + g257*g266 + g66)/(g49*(g29 - 1.0)) + xF[14]*(g30 + 1.0)*(g238*g263 + g255*g266 + g66)/(g49*(g30 - 1.0)) + xF[15]*(g31 + 1.0)*(g227*g263 + g244*g266 + g66)/(g49*(g31 - 1.0)) + xF[16]*(g32 + 1.0)*(g236*g263 + g253*g266 + g66)/(g49*(g32 - 1.0)) + xF[17]*(g33 + 1.0)*(g226*g263 + g249*g266 + g66)/(g49*(g33 - 1.0)) + xF[18]*(g34 + 1.0)*(g232*g263 + g258*g266 + g66)/(g49*(g34 - 1.0)) + xF[1]*(g35 + 1.0)*(g241*g263 + g250*g266 + g66)/(g49*(g35 - 1.0)) + xF[2]*(g36 + 1.0)*(g229*g263 + g246*g266 + g66)/(g49*(g36 - 1.0)) + xF[3]*(g37 + 1.0)*(g235*g263 + g247*g266 + g66)/(g49*(g37 - 1.0)) + xF[4]*(g38 + 1.0)*(g228*g263 + g248*g266 + g66)/(g49*(g38 - 1.0)) + xF[5]*(g39 + 1.0)*(g231*g263 + g261*g266 + g66)/(g49*(g39 - 1.0)) + xF[6]*(g40 + 1.0)*(g233*g263 + g254*g266 + g66)/(g49*(g40 - 1.0)) + xF[7]*(g41 + 1.0)*(g242*g263 + g259*g266 + g66)/(g49*(g41 - 1.0)) + xF[8]*(g42 + 1.0)*(g240*g263 + g251*g266 + g66)/(g49*(g42 - 1.0)) + xF[9]*(g43 + 1.0)*(g225*g263 + g252*g266 + g66)/(g49*(g43 - 1.0));
24952 xP[0] = g112*g206*g68;
24953 xP[1] = g110*g212*g68;
24954 xP[2] = g113*g209*g68;
24955 xP[3] = g114*g215*g68;
24956 xP[4] = g115*g208*g68;
24957 xP[5] = g116*g223*g68;
24958 xP[6] = g117*g216*g68;
24959 xP[7] = g118*g221*g68;
24960 xP[8] = g119*g218*g68;
24961 xP[9] = g120*g222*g68;
24962 xP[10] = g121*g220*g68;
24963 xP[11] = g122*g210*g68;
24964 xP[12] = g123*g219*g68;
24965 xP[13] = g124*g213*g68;
24966 xP[14] = g125*g217*g68;
24967 xP[15] = g126*g207*g68;
24968 xP[16] = g127*g214*g68;
24969 xP[17] = g128*g205*g68;
24970 xP[18] = g129*g211*g68;
24971 xT[0] = g108*g206*g71;
24972 xT[1] = g108*g212*g69;
24973 xT[2] = g108*g209*g72;
24974 xT[3] = g108*g215*g73;
24975 xT[4] = g108*g208*g74;
24976 xT[5] = g108*g223*g75;
24977 xT[6] = g108*g216*g76;
24978 xT[7] = g108*g221*g77;
24979 xT[8] = g108*g218*g78;
24980 xT[9] = g108*g222*g79;
24981 xT[10] = g108*g220*g80;
24982 xT[11] = g108*g210*g81;
24983 xT[12] = g108*g219*g82;
24984 xT[13] = g108*g213*g83;
24985 xT[14] = g108*g217*g84;
24986 xT[15] = g108*g207*g85;
24987 xT[16] = g108*g214*g86;
24988 xT[17] = g108*g205*g87;
24989 xT[18] = g108*g211*g88;
24992 n0 = MW[0] - Mstar;
24996 n4 = MW[10] - Mstar;
24997 n5 = MW[11] - Mstar;
24998 n6 = MW[12] - Mstar;
24999 n7 = MW[13] - Mstar;
25000 n8 = MW[14] - Mstar;
25001 n9 = MW[15] - Mstar;
25002 n10 = MW[16] - Mstar;
25003 n11 = MW[17] - Mstar;
25004 n12 = MW[18] - Mstar;
25005 n13 = MW[19] - Mstar;
25006 n14 = MW[1] - Mstar;
25007 n15 = MW[2] - Mstar;
25008 n16 = MW[3] - Mstar;
25009 n17 = MW[4] - Mstar;
25010 n18 = MW[5] - Mstar;
25011 n19 = MW[6] - Mstar;
25012 n20 = MW[7] - Mstar;
25013 n21 = MW[8] - Mstar;
25014 n22 = MW[9] - Mstar;
25031 n39 = pow(n0, -n24);
25032 n40 = pow(n1, -n24);
25033 n41 = pow(n4, -n24);
25034 n42 = pow(n5, -n24);
25035 n43 = pow(n6, -n24);
25036 n44 = pow(n7, -n24);
25037 n45 = pow(n8, -n24);
25038 n46 = pow(n9, -n24);
25039 n47 = pow(n10, -n24);
25040 n48 = pow(n11, -n24);
25041 n49 = pow(n12, -n24);
25042 n50 = pow(n13, -n24);
25043 n51 = pow(n14, -n24);
25044 n52 = pow(n15, -n24);
25045 n53 = pow(n16, -n24);
25046 n54 = pow(n17, -n24);
25047 n55 = pow(n18, -n24);
25048 n56 = pow(n19, -n24);
25049 n57 = pow(n20, -n24);
25050 n58 = pow(n21, -n24);
25051 n59 = pow(n22, -n24);
25055 n63 = pow(alpha, n62);
25056 n64 = n26 + n32*xF[0];
25057 n65 = n26 + n32*xPj;
25058 n66 = pow(alpha, NP0*n4);
25059 n67 = pow(alpha, NP0*n5);
25060 n68 = pow(alpha, NP0*n6);
25061 n69 = pow(alpha, NP0*n7);
25062 n70 = pow(alpha, NP0*n8);
25063 n71 = pow(alpha, NP0*n9);
25064 n72 = pow(alpha, NP0*n10);
25065 n73 = pow(alpha, NP0*n11);
25066 n74 = pow(alpha, NP0*n12);
25067 n75 = pow(alpha, NP0*n13);
25068 n76 = pow(alpha, NP0*n14);
25069 n77 = pow(alpha, NP0*n15);
25070 n78 = pow(alpha, NP0*n16);
25071 n79 = pow(alpha, NP0*n17);
25072 n80 = pow(alpha, NP0*n18);
25073 n81 = pow(alpha, NP0*n19);
25074 n82 = pow(alpha, NP0*n20);
25075 n83 = pow(alpha, NP0*n21);
25076 n84 = pow(alpha, NP0*n22);
25090 n98 = pow(alpha, NP0*n24*n25);
25091 n99 = pow(n64, -n24);
25092 n100 = pow(n65, -n24);
25141 n149 = n106*xF[16];
25142 n150 = n101*xF[11];
25144 n152 = n108*xF[18];
25147 n155 = n126*xF[16];
25148 n156 = n105*xF[15];
25158 n166 = n127*xF[17];
25168 n176 = n103*xF[13];
25169 n177 = n125*xF[15];
25170 n178 = n124*xF[14];
25176 n184 = n104*xF[14];
25181 n189 = n123*xF[13];
25183 n191 = n129*xF[19];
25187 n195 = n120*xF[10];
25190 n198 = n128*xF[18];
25191 n199 = log((-1.0 + xPj/xF[0])/n2);
25192 n200 = n173*xF[14];
25195 n203 = n182*xF[16];
25223 n231 = n40*n41*n66;
25224 n232 = n40*n43*n68;
25226 n234 = n40*n48*n73;
25227 n235 = n40*n51*n76;
25228 n236 = n40*n53*n78;
25230 n238 = n40*n56*n81;
25231 n239 = n40*n57*n82;
25233 n241 = n40*n59*n84;
25234 n242 = n40*n45*n70;
25235 n243 = n40*n47*n72;
25236 n244 = n205*n40*xF[0];
25240 n248 = n208*n40*xF[4];
25241 n249 = n140*n229 + 1;
25242 n250 = -n229*n63 + 1;
25243 n251 = pow(n249, -n24);
25244 n252 = pow(n250, -n24);
25245 n253 = n1*n229*n63;
25246 n254 = n199 + n23 + n60 + n85;
25248 n256 = n100/(n252*n99);
25250 n258 = n146*(n254 - log(n249)) + 1;
25251 n259 = n146*(n254 - log(n250)) + 1;
25252 n260 = pow(alpha, n0*n258);
25253 n261 = pow(alpha, n258*n4);
25254 n262 = pow(alpha, n258*n5);
25255 n263 = pow(alpha, n258*n6);
25256 n264 = pow(alpha, n258*n7);
25257 n265 = pow(alpha, n258*n8);
25258 n266 = pow(alpha, n258*n9);
25259 n267 = pow(alpha, n10*n258);
25260 n268 = pow(alpha, n11*n258);
25261 n269 = pow(alpha, n12*n258);
25262 n270 = pow(alpha, n13*n258);
25263 n271 = pow(alpha, n14*n258);
25264 n272 = pow(alpha, n15*n258);
25265 n273 = pow(alpha, n16*n258);
25266 n274 = pow(alpha, n17*n258);
25267 n275 = pow(alpha, n18*n258);
25268 n276 = pow(alpha, n19*n258);
25269 n277 = pow(alpha, n20*n258);
25270 n278 = pow(alpha, n21*n258);
25271 n279 = pow(alpha, n22*n258);
25272 n280 = pow(alpha, -n259*n4);
25273 n281 = pow(alpha, -n259*n6);
25274 n282 = pow(alpha, -n259*n9);
25275 n283 = pow(alpha, -n11*n259);
25276 n284 = pow(alpha, -n14*n259);
25277 n285 = pow(alpha, -n16*n259);
25278 n286 = pow(alpha, -n18*n259);
25279 n287 = pow(alpha, -n19*n259);
25280 n288 = pow(alpha, -n20*n259);
25281 n289 = pow(alpha, -n21*n259);
25282 n290 = pow(alpha, -n22*n259);
25328 n336 = pow(alpha, n25*n258) + n96 - 1;
25329 n337 = n97 - 1 + 1.0/n261;
25330 n338 = n101 - 1 + 1.0/n262;
25331 n339 = n102 - 1 + 1.0/n263;
25332 n340 = n103 - 1 + 1.0/n264;
25333 n341 = n104 - 1 + 1.0/n265;
25334 n342 = n105 - 1 + 1.0/n266;
25335 n343 = n106 - 1 + 1.0/n267;
25336 n344 = n107 - 1 + 1.0/n268;
25337 n345 = n108 - 1 + 1.0/n269;
25338 n346 = n109 - 1 + 1.0/n270;
25339 n347 = n110 - 1 + 1.0/n271;
25340 n348 = n111 - 1 + 1.0/n272;
25341 n349 = n112 - 1 + 1.0/n273;
25342 n350 = n113 - 1 + 1.0/n274;
25343 n351 = n114 - 1 + 1.0/n275;
25344 n352 = n115 - 1 + 1.0/n276;
25345 n353 = n116 - 1 + 1.0/n277;
25346 n354 = n117 - 1 + 1.0/n278;
25347 n355 = n118 - 1 + 1.0/n279;
25348 n356 = n96 - 1 + 1.0/n260;
25349 n357 = -n301 + n97 - 1;
25350 n358 = n101 - n310 - 1;
25351 n359 = -n139 - n298 - 1;
25352 n360 = n103 - n295 - 1;
25354 n362 = n105 - n306 - 1;
25356 n364 = n107 - n327 - 1;
25357 n365 = n108 - n291 - 1;
25358 n366 = n109 - n320 - 1;
25359 n367 = n110 - n325 - 1;
25361 n369 = n112 - n317 - 1;
25363 n371 = n114 - n312 - 1;
25364 n372 = n115 - n300 - 1;
25365 n373 = n116 - n329 - 1;
25366 n374 = n117 - n323 - 1;
25367 n375 = n118 - n315 - 1;
25368 n376 = pow(n336, -n24);
25369 n377 = pow(n337, -n24);
25370 n378 = pow(n338, -n24);
25371 n379 = pow(n339, -n24);
25372 n380 = pow(n340, -n24);
25373 n381 = pow(n341, -n24);
25374 n382 = pow(n342, -n24);
25375 n383 = pow(n343, -n24);
25376 n384 = pow(n344, -n24);
25377 n385 = pow(n345, -n24);
25378 n386 = pow(n346, -n24);
25379 n387 = pow(n347, -n24);
25380 n388 = pow(n348, -n24);
25381 n389 = pow(n349, -n24);
25382 n390 = pow(n350, -n24);
25383 n391 = pow(n351, -n24);
25384 n392 = pow(n352, -n24);
25385 n393 = pow(n353, -n24);
25386 n394 = pow(n354, -n24);
25387 n395 = pow(n355, -n24);
25388 n396 = pow(n336, 3);
25389 n397 = pow(n337, 3);
25390 n398 = pow(n338, 3);
25391 n399 = pow(n339, 3);
25392 n400 = pow(n340, 3);
25393 n401 = pow(n341, 3);
25394 n402 = pow(n342, 3);
25395 n403 = pow(n343, 3);
25396 n404 = pow(n344, 3);
25397 n405 = pow(n345, 3);
25398 n406 = pow(n346, 3);
25399 n407 = pow(n347, 3);
25400 n408 = pow(n348, 3);
25401 n409 = pow(n349, 3);
25402 n410 = pow(n350, 3);
25403 n411 = pow(n351, 3);
25404 n412 = pow(n352, 3);
25405 n413 = pow(n353, 3);
25406 n414 = pow(n354, 3);
25407 n415 = pow(n355, 3);
25408 n416 = pow(n356, -n24);
25409 n417 = pow(n357, -n24);
25410 n418 = pow(n362, -n24);
25411 n419 = pow(n364, -n24);
25412 n420 = pow(n366, -n24);
25413 n421 = pow(n368, -n24);
25414 n422 = pow(n369, -n24);
25415 n423 = pow(n370, -n24);
25416 n424 = pow(n371, -n24);
25417 n425 = pow(n372, -n24);
25418 n426 = pow(n373, -n24);
25419 n427 = pow(n356, 3);
25420 n428 = xF[12]/n339;
25421 n429 = xF[17]/n344;
25423 n431 = xF[10]/n337;
25424 n432 = xF[11]/n338;
25425 n433 = xF[19]/n346;
25427 n435 = xF[16]/n343;
25428 n436 = xF[14]/n341;
25432 n440 = xF[17]/n384;
25433 n441 = xF[10]/n377;
25440 n448 = n1*n12/n345;
25445 n453 = n115*xF[6]/n412;
25447 n455 = n113*xF[4]/n390;
25448 n456 = n107*xF[17]/n404;
25449 n457 = n102*xF[12]/n399;
25451 n459 = n97*xF[10]/n397;
25452 n460 = 1/(n249*n274);
25453 n461 = 1/(n249*n260);
25454 n462 = n12/(n249*n269);
25455 n463 = n22/(n249*n279);
25458 n466 = n241*xF[9]/n355;
25459 n467 = n235*xF[1]/n347;
25466 n474 = n1*n25*n434*n63*n86;
25467 n475 = n244*n86/n336;
25468 n476 = n231*n431*n86;
25469 n477 = n202*n40*n432*n86;
25470 n478 = n232*n428*n86;
25471 n479 = n143*n153*n86/n340;
25472 n480 = n242*n436*n86;
25473 n481 = n233*n86*xF[15]/n342;
25474 n482 = n243*n435*n86;
25475 n483 = n234*n429*n86;
25476 n484 = n144*n171*n86/n345;
25477 n485 = n207*n40*n433*n86;
25479 n487 = n181*n449*n86;
25480 n488 = n247*n86/n349;
25481 n489 = n248*n86/n350;
25482 n490 = n237*n86*xF[5]/n351;
25483 n491 = n246*n86/n352;
25484 n492 = n245*n86/n353;
25485 n493 = n145*n174*n86/n354;
25487 n495 = n244*n430*n86;
25488 n496 = n229*n461 + 1;
25489 n497 = n209*n229*n461 + n209;
25490 n498 = n210 + n253*n324/n249;
25491 n499 = n211 + n253*n311/n249;
25492 n500 = n212 + n253*n294/n249;
25493 n501 = n213 + n229*n63*n89/(n249*n264);
25494 n502 = n214 + n253*n305/n249;
25495 n503 = n215 + n229*n63*n91/(n249*n266);
25496 n504 = n216 + n253*n308/n249;
25497 n505 = n217 + n253*n302/n249;
25498 n506 = n218 + n253*n462;
25499 n507 = n219 + n253*n296/n249;
25500 n508 = n220 + n253*n314/n249;
25501 n509 = n221 + n229*n63*n90/(n249*n272);
25502 n510 = n222 + n253*n303/n249;
25503 n511 = n223 + n253*n318/n249;
25504 n512 = n224 + n229*n63*n87/(n249*n275);
25505 n513 = n225 + n253*n304/n249;
25506 n514 = n226 + n253*n297/n249;
25507 n515 = n227 + n229*n63*n92/(n249*n278);
25508 n516 = n228 + n253*n463;
25509 n517 = pow(n497, -n24);
25510 n518 = pow(n498, -n24);
25511 n519 = pow(n499, -n24);
25512 n520 = pow(n500, -n24);
25513 n521 = pow(n501, -n24);
25514 n522 = pow(n502, -n24);
25515 n523 = pow(n503, -n24);
25516 n524 = pow(n504, -n24);
25517 n525 = pow(n505, -n24);
25518 n526 = pow(n506, -n24);
25519 n527 = pow(n507, -n24);
25520 n528 = pow(n508, -n24);
25521 n529 = pow(n509, -n24);
25522 n530 = pow(n510, -n24);
25523 n531 = pow(n511, -n24);
25524 n532 = pow(n512, -n24);
25525 n533 = pow(n513, -n24);
25526 n534 = pow(n514, -n24);
25527 n535 = pow(n515, -n24);
25528 n536 = pow(n516, -n24);
25529 n537 = pow(alpha, n25*n259)*n209*n229/n250 + n209;
25532 n540 = n1*n24*n25*n63 + n24*n25*n253*n461;
25533 n541 = pow(n537, -n24);
25534 n542 = -n205*n229*n255/n260 - n205*n40;
25535 n543 = n205*n229*n461*n88 + n205*n88;
25551 n559 = n500*xF[12]/n379;
25552 n560 = n513*xF[6]/n392;
25554 n562 = n507*xF[19]/n386;
25565 n573 = n517*n96/n396;
25566 n574 = n112*n530*xF[3]/n409;
25567 n575 = n197*n535/n414;
25568 n576 = n109*n527*xF[19]/n406;
25569 n577 = n450*n538*n86;
25570 n578 = n179*n542/n416;
25571 n579 = n24*n25*n447*n63*n86*xF[0]*(pow(alpha, n25*n258 + n62)*n0*n1*n229/n249 + n209);
25572 n580 = n163*n441*n61*n86*(pow(alpha, -n258*n4 + n62)*n1*n229*n4/n249 + n210);
25573 n581 = n211*n30*n86*(pow(alpha, -n258*n5 + n62)*n1*n229*n5/n249 + n211)/n378;
25574 n582 = n212*n29*n86*(pow(alpha, -n258*n6 + n62)*n1*n229*n6/n249 + n212)/n379;
25575 n583 = n143*n61*n7*n86*(pow(alpha, -n258*n7 + n62)*n229*n89/n249 + n213)/n380;
25576 n584 = n200*n61*n86*(pow(alpha, -n258*n8 + n62)*n1*n229*n8/n249 + n214)/n381;
25577 n585 = n194*n61*n86*xF[15]*(pow(alpha, -n258*n9 + n62)*n229*n91/n249 + n215)/n382;
25578 n586 = n203*n61*n86*(pow(alpha, -n10*n258 + n62)*n1*n10*n229/n249 + n216)/n383;
25579 n587 = n217*n36*n86*(pow(alpha, -n11*n258 + n62)*n1*n11*n229/n249 + n217)/n384;
25580 n588 = n12*n144*n61*n86*(pow(alpha, -n12*n258 + n62)*n1*n12*n229/n249 + n218)/n385;
25581 n589 = n169*n61*n86*xF[19]*(pow(alpha, -n13*n258 + n62)*n1*n13*n229/n249 + n219)/n386;
25582 n590 = n220*n35*n86*(pow(alpha, -n14*n258 + n62)*n1*n14*n229/n249 + n220)/n387;
25583 n591 = n147*n15*n61*n86*(pow(alpha, -n15*n258 + n62)*n229*n90/n249 + n221)/n388;
25584 n592 = n154*n437*n61*n86*(pow(alpha, -n16*n258 + n62)*n1*n16*n229/n249 + n222);
25585 n593 = n223*n28*n86*(pow(alpha, -n17*n258 + n62)*n1*n17*n229/n249 + n223)/n390;
25586 n594 = n18*n61*n80*n86*xF[5]*(pow(alpha, -n18*n258 + n62)*n229*n87/n249 + n224)/n391;
25587 n595 = n157*n61*n86*xF[6]*(pow(alpha, -n19*n258 + n62)*n1*n19*n229/n249 + n225)/n392;
25588 n596 = n206*n61*n86*(pow(alpha, -n20*n258 + n62)*n1*n20*n229/n249 + n226)/n393;
25589 n597 = n145*n21*n61*n86*(pow(alpha, -n21*n258 + n62)*n229*n92/n249 + n227)/n394;
25590 n598 = n204*n61*n86*(pow(alpha, -n22*n258 + n62)*n1*n22*n229/n249 + n228)/n395;
25591 n599 = 1.0*n209*n538*n86/n376;
25592 n600 = n450*n543*n86*xF[0];
25594 n602 = pow(alpha, n0*n38)*n0*n100*n324*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n41*n88/(n251*n261*n99) + n158*n229*n255*n324 + n231;
25595 n603 = pow(alpha, n0*n38)*n0*n100*n294*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n43*n88/(n251*n263*n99) + n158*n229*n255*n294 + n232;
25596 n604 = pow(alpha, n0*n38)*n100*n153/(n251*n264*n99) + pow(alpha, n0*n38)*n100*n25*n292*n40/(n251*n99) + n229*n25*n255*n292*n63 + n44*n69*n88;
25597 n605 = pow(alpha, n0*n38)*n0*n100*n321*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n46*n88/(n251*n266*n99) + n158*n229*n255*n321 + n233;
25598 n606 = pow(alpha, n0*n38)*n100*n25*n308*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n333*n40/(n251*n99) + n229*n25*n255*n308*n63 + n47*n72*n88;
25599 n607 = pow(alpha, n0*n38)*n0*n100*n302*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n48*n88/(n251*n268*n99) + n158*n229*n255*n302 + n234;
25600 n608 = pow(alpha, n0*n38)*n100*n12*n25*n40/(n251*n269*n99) + pow(alpha, n0*n38)*n100*n171/(n251*n269*n99) + n12*n229*n25*n255*n63/n269 + n49*n74*n88;
25601 n609 = pow(alpha, n0*n38)*n100*n25*n296*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n40*n50/(n251*n270*n99) + n207*n88 + n229*n25*n255*n296*n63;
25602 n610 = pow(alpha, n0*n38)*n100*n181/(n251*n272*n99) + pow(alpha, n0*n38)*n100*n25*n316*n40/(n251*n99) + n229*n25*n255*n316*n63 + n52*n77*n88;
25603 n611 = pow(alpha, n0*n38)*n0*n100*n303*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n53*n88/(n251*n273*n99) + n158*n229*n255*n303 + n236;
25604 n612 = pow(alpha, n0*n38)*n0*n100*n304*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n56*n88/(n251*n276*n99) + n158*n229*n255*n304 + n238;
25605 n613 = pow(alpha, n0*n38)*n100*n40*n93/(n251*n279*n99) + pow(alpha, n0*n38)*n100*n59*n88/(n251*n279*n99) + n229*n255*n63*n93/n279 + n241;
25606 n614 = pow(alpha, n0*n38)*n100*n25*n311*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n40*n42/(n251*n262*n99) + n202*n88 + n229*n25*n255*n311*n63;
25607 n615 = n184*(pow(alpha, n0*n38 - n258*n8)*n100*n25*n40*n8/(n251*n99) + pow(alpha, n0*n38 - n258*n8)*n100*n40*n45/(n251*n99) + n229*n25*n255*n305*n63 + n45*n70*n88)/n381;
25608 n616 = n176*n86*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + n229*n25*n255*n292*n63 + n44*n69*n88)/n380;
25610 n618 = n149*n86*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + n229*n25*n255*n308*n63 + n47*n72*n88)/n383;
25611 n619 = n152*n86*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + n12*n229*n25*n255*n63/n269 + n49*n74*n88)/n385;
25612 n620 = n109*n86*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + n207*n88 + n229*n25*n255*n296*n63)/n386;
25613 n621 = n170*n86*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + n229*n25*n255*n316*n63 + n52*n77*n88)/n388;
25614 n622 = n455*n86*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + n148*n229*n25*n460*n63 + n208*n88);
25615 n623 = n142*n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + n158*n229*n255*n324 + n231);
25616 n624 = n139*n86*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + n158*n229*n255*n294 + n232)/n379;
25617 n625 = n142*n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + n158*n229*n255*n321 + n233)/n382;
25618 n626 = n107*n142*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + n158*n229*n255*n302 + n234);
25619 n627 = n142*n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + n158*n229*n255*n314 + n235);
25620 n628 = n112*n142*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + n158*n229*n255*n303 + n236);
25621 n629 = n142*n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + n229*n255*n63*n94/n275 + n237);
25622 n630 = n115*n142*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + n158*n229*n255*n304 + n238)/n392;
25623 n631 = n142*n164*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + n158*n229*n255*n297 + n239)/n393;
25624 n632 = n142*n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + n158*n229*n255*n307 + n240);
25625 n633 = n142*n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + n229*n255*n63*n93/n279 + n241)/n395;
25626 n634 = n495 + n599 + n601;
25627 n635 = xTj*(n109*n142*n562 + n115*n142*n560 + n139*n559*n86 + n142*n149*n547 + n142*n150*n548 + n142*n152*n550 + n142*n156*n555 + n142*n162*n551 + n142*n164*n557 + n142*n170*n549 + n142*n176*n553 + n142*n184*n554 + n142*n437*n544 + n142*n440*n546 + n142*n441*n545 + n142*n450*n538 + n142*n452*n512 + n142*n454*n508 + n142*n455*n511 + n142*n458*n515 + n143*n86*n89/n340 + n144*n448*n86 + n145*n86*n92/n354 + n200*n439*n86 + n201*n438*n86 + n203*n442*n86 + n204*n443*n86 + n206*n444*n86 + n209*n434*n86 + n210*n431*n86 + n211*n432*n86 + n212*n428*n86 + n215*n86*xF[15]/n342 + n217*n429*n86 + n219*n433*n86 + n222*n86*xF[3]/n349 + n223*n86*xF[4]/n350 + n224*n86*xF[5]/n351 + n225*n86*xF[6]/n352 + n449*n86*n90);
25628 n636 = n474 + n577 + n635;
25629 n637 = n475 + n476 + n477 + n478 + n479 + n480 + n481 + n482 + n483 + n484 + n485 + n486 + n487 + n488 + n489 + n490 + n491 + n492 + n493 + n494 + n579 + n580 + n581 + n582 + n583 + n584 + n585 + n586 + n587 + n588 + n589 + n590 + n591 + n592 + n593 + n594 + n595 + n596 + n597 + n598 + n600 + n616 + n617 + n618 + n619 + n620 + n621 + n622 + n623 + n624 + n625 + n626 + n627 + n628 + n629 + n630 + n631 + n632 + n633;
25630 n638 = n109*n142*n507*xF[19]*(n169*n61 + n229*n296*n61*n63/n249)/n406 + n139*n500*n86*xF[12]*(n229*n294*n61*n63/n249 + n6*n61*n68)/n399 + n142*n149*n504*(n182*n61 + n229*n308*n61*n63/n249)/n403 + n142*n150*n499*(n229*n311*n61*n63/n249 + n5*n61*n67)/n398 + n142*n152*n506*(n192*n61 + n229*n462*n61*n63)/n405 + n142*n156*n503*(n194*n61 + n229*n321*n61*n63/n249)/n402 + n142*n162*n516*(n185*n61 + n229*n463*n61*n63)/n415 + n142*n164*n514*(n193*n61 + n229*n297*n61*n63/n249)/n413 + n142*n170*n509*(n15*n61*n77 + n229*n316*n61*n63/n249)/n408 + n142*n176*n501*(n229*n292*n61*n63/n249 + n61*n69*n7)/n400 + n142*n184*n502*(n173*n61 + n229*n305*n61*n63/n249)/n401 + n142*n186*n512*(n18*n61*n80 + n229*n322*n61*n63/n249)/n411 + n142*n187*n508*(n188*n61 + n229*n314*n61*n63/n249)/n407 + n142*n197*n515*(n21*n61*n83 + n229*n307*n61*n63/n249)/n414 + n142*n451*n539*(n17*n61*n79 + n229*n318*n61*n63/n249) + n142*n453*n513*(n157*n61 + n229*n304*n61*n63/n249) + n142*n456*n505*(n161*n61 + n229*n302*n61*n63/n249) + n142*n459*n498*(n163*n61 + n229*n324*n61*n63/n249) + n142*n538*n572*n96 + n142*n544*xF[3]*(n154*n61 + n229*n303*n61*n63/n249)/n409 + n150*n86*(pow(alpha, n0*n38 - n258*n5)*n100*n25*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n40*n42/(n251*n99) + n202*n88 + n229*n25*n255*n311*n63)/n378 + n637;
25631 NP_b = -n209*n450*n496*n86*xF[0] - n38*(1.0*n209*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)/n376 + 0.5*n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n495 - 1.0*n573*n86*xF[0] - 0.5*xTj*(n107*n142*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + pow(alpha, -n11*n258 + n62)*n0*n11*n229*n255 + n234) + n109*n86*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + pow(alpha, -n13*n258 + n62)*n13*n229*n25*n255 + n207*n88)/n386 + n112*n142*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + pow(alpha, -n16*n258 + n62)*n0*n16*n229*n255 + n236) + n115*n142*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + pow(alpha, -n19*n258 + n62)*n0*n19*n229*n255 + n238)/n392 + n139*n86*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + pow(alpha, -n258*n6 + n62)*n0*n229*n255*n6 + n232)/n379 + n142*n150*(pow(alpha, n0*n38 - n258*n5)*n0*n100*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n42*n88/(n251*n99) + pow(alpha, -n258*n5 + n62)*n0*n229*n255*n5 + n202*n40)/n378 + n142*n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + pow(alpha, -n258*n9 + n62)*n0*n229*n255*n9 + n233)/n382 + n142*n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + pow(alpha, -n22*n258 + n62)*n229*n255*n93 + n241)/n395 + n142*n164*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + pow(alpha, -n20*n258 + n62)*n0*n20*n229*n255 + n239)/n393 + n142*n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + pow(alpha, -n258*n4 + n62)*n0*n229*n255*n4 + n231) + n142*n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + pow(alpha, -n18*n258 + n62)*n229*n255*n94 + n237) + n142*n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + pow(alpha, -n14*n258 + n62)*n0*n14*n229*n255 + n235) + n142*n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + pow(alpha, -n21*n258 + n62)*n0*n21*n229*n255 + n240) + n149*n24*n569*n86 + n149*n86*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + pow(alpha, -n10*n258 + n62)*n10*n229*n25*n255 + n47*n72*n88)/n383 + n150*n24*n568*n86 + n152*n24*n558*n86 + n152*n86*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + pow(alpha, -n12*n258 + n62)*n12*n229*n25*n255 + n49*n74*n88)/n385 + n156*n24*n563*n86 + n162*n24*n561*n86 + n164*n24*n565*n86 + n170*n24*n566*n86 + n170*n86*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + pow(alpha, -n15*n258 + n62)*n15*n229*n25*n255 + n52*n77*n88)/n388 + n176*n24*n564*n86 + n176*n86*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + pow(alpha, -n258*n7 + n62)*n229*n25*n255*n7 + n44*n69*n88)/n380 + n184*n24*n571*n86 + n184*n86*(pow(alpha, n0*n38 - n258*n8)*n100*n25*n40*n8/(n251*n99) + pow(alpha, n0*n38 - n258*n8)*n100*n40*n45/(n251*n99) + pow(alpha, -n258*n8 + n62)*n229*n25*n255*n8 + n45*n70*n88)/n381 + n186*n24*n567*n86 + n187*n24*n570*n86 + n24*n451*n531*n86*xF[4] + n24*n453*n533*n86 + n24*n456*n525*n86 + n24*n457*n520*n86 + n24*n459*n518*n86 + n24*n573*n86*xF[0] + n24*n574*n86 + n24*n575*n86 + n24*n576*n86 + n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n455*n86*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + pow(alpha, -n17*n258 + n62)*n148*n229*n25/n249 + n208*n88) + n475 + n476 + n477 + n478 + n479 + n480 + n481 + n482 + n483 + n484 + n485 + n486 + n487 + n488 + n489 + n490 + n491 + n492 + n493 + n494 + n579 + n580 + n581 + n582 + n583 + n584 + n585 + n586 + n587 + n588 + n589 + n590 + n591 + n592 + n593 + n594 + n595 + n596 + n597 + n598)) - n474 - n86*xTj*(-n109*n562 - n115*n560 + n139*n559 + n143*n89/n340 + n144*n448 + n145*n92/n354 - n149*n547 - n150*n548 - n152*n550 - n156*n555 - n162*n551 + n164*n445*n514 - n170*n549 - n176*n553 - n184*n554 + n200*n439 + n201*n438 + n203*n442 + n204*n443 + n206*n444 + n209*n434 + n210*n431 + n211*n432 + n212*n428 + n215*xF[15]/n342 + n217*n429 + n219*n433 + n222*xF[3]/n349 + n223*xF[4]/n350 + n224*xF[5]/n351 + n225*xF[6]/n352 - n437*n544 - n440*n546 - n441*n545 + n449*n90 - n450*n538 - n452*n512 - n454*n508 - n455*n511 - n458*n515);
25632 NP_2a = -n86*(pow(alpha, n0*n38)*n33*n39*n40*pow(n496, -n24)*n96/n396 - 2.0*pow(alpha, n0*n38)*n39*n40*n496*xF[0]/n376 + n205*n450*n88*xF[0]*(n461*(-n26 + xPj*xTj)/n64 - 1) - 1.0*n244/n336 + 1.0*xTj*(-n107*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + n158*n229*n255*n302 + n234) + n109*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + n207*n88 + n229*n25*n255*n296*n63)/n386 - n112*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + n158*n229*n255*n303 + n236) - n115*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + n158*n229*n255*n304 + n238)/n392 + n12*n144*n61*(pow(alpha, -n12*n258 + n62)*n1*n12*n229/n249 + n218)/n385 + n139*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + n158*n229*n255*n294 + n232)/n379 + n143*n153/n340 + n143*n61*n7*(pow(alpha, -n258*n7 + n62)*n229*n89/n249 + n213)/n380 + n144*n171/n345 + n145*n174/n354 + n145*n21*n61*(pow(alpha, -n21*n258 + n62)*n229*n92/n249 + n227)/n394 + n147*n15*n61*(pow(alpha, -n15*n258 + n62)*n229*n90/n249 + n221)/n388 + n149*n24*n569 + n149*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + n229*n25*n255*n308*n63 + n47*n72*n88)/n383 + n150*n24*n568 + n150*(pow(alpha, n0*n38 - n258*n5)*n100*n25*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n40*n42/(n251*n99) + n202*n88 + n229*n25*n255*n311*n63)/n378 + n152*n24*n558 + n152*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + n12*n229*n25*n255*n63/n269 + n49*n74*n88)/n385 + n154*n437*n61*(pow(alpha, -n16*n258 + n62)*n1*n16*n229/n249 + n222) + n156*n24*n563 - n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + n158*n229*n255*n321 + n233)/n382 + n157*n61*xF[6]*(pow(alpha, -n19*n258 + n62)*n1*n19*n229/n249 + n225)/n392 + n162*n24*n561 - n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + n229*n255*n63*n93/n279 + n241)/n395 + n163*n441*n61*(pow(alpha, -n258*n4 + n62)*n1*n229*n4/n249 + n210) + n164*n24*n565 + n164*n445*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + n158*n229*n255*n297 + n239) + n169*n61*xF[19]*(pow(alpha, -n13*n258 + n62)*n1*n13*n229/n249 + n219)/n386 + n170*n24*n566 + n170*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + n229*n25*n255*n316*n63 + n52*n77*n88)/n388 + n176*n24*n564 + n176*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + n229*n25*n255*n292*n63 + n44*n69*n88)/n380 + n18*n61*n80*xF[5]*(pow(alpha, -n18*n258 + n62)*n229*n87/n249 + n224)/n391 + n181*n449 + n184*n24*n571 + n186*n24*n567 + n187*n24*n570 + n194*n61*xF[15]*(pow(alpha, -n258*n9 + n62)*n229*n91/n249 + n215)/n382 + n200*n61*(pow(alpha, -n258*n8 + n62)*n1*n229*n8/n249 + n214)/n381 + n202*n40*n432 + n203*n61*(pow(alpha, -n10*n258 + n62)*n1*n10*n229/n249 + n216)/n383 + n204*n61*(pow(alpha, -n22*n258 + n62)*n1*n22*n229/n249 + n228)/n395 + n206*n61*(pow(alpha, -n20*n258 + n62)*n1*n20*n229/n249 + n226)/n393 + n207*n40*n433 + n211*n30*(pow(alpha, -n258*n5 + n62)*n1*n229*n5/n249 + n211)/n378 + n212*n29*(pow(alpha, -n258*n6 + n62)*n1*n229*n6/n249 + n212)/n379 + n217*n36*(pow(alpha, -n11*n258 + n62)*n1*n11*n229/n249 + n217)/n384 + n220*n35*(pow(alpha, -n14*n258 + n62)*n1*n14*n229/n249 + n220)/n387 + n223*n28*(pow(alpha, -n17*n258 + n62)*n1*n17*n229/n249 + n223)/n390 + n231*n431 + n232*n428 + n233*xF[15]/n342 + n234*n429 + n237*xF[5]/n351 + n24*n25*n447*n63*xF[0]*(pow(alpha, n25*n258 + n62)*n0*n1*n229/n249 + n209) + n24*n451*n531*xF[4] + n24*n453*n533 + n24*n456*n525 + n24*n457*n520 + n24*n459*n518 + n24*n573*xF[0] + n24*n574 + n24*n575 + n24*n576 + n242*n436 + n243*n435 + n244/n336 + n245/n353 + n246/n352 + n247/n349 + n248/n350 - n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + n158*n229*n255*n324 + n231) + n450*n543*xF[0] - n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + n229*n255*n63*n94/n275 + n237) - n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + n158*n229*n255*n314 + n235) + n455*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + n148*n229*n25*n460*n63 + n208*n88) - n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + n158*n229*n255*n307 + n240) + n466 + n467 + n615));
25633 NP_sqrt_base = (NP0*n636 + n142*n179/n356 + n32*(-n102*n86*xF[12]/(n102 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n107*n86*xF[17]/(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n109*n86*xF[19]/(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n112*n86*xF[3]/(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n113*n86*xF[4]/(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n115*n86*xF[6]/(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n149*n86/(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n150*n86/(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n152*n86/(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n156*n86/(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n162*n86/(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n164*n86/(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n170*n86/(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n176*n86/(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n184*n86/(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n186*n86/(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n187*n86/(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n197*n86/(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n86*n96*xF[0]/(pow(alpha, n25*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)) + n96 - 1) - n86*n97*xF[10]/(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)))) + pow(NP0, -n24)*(1.0*n209*n538*n86/n376 + 0.5*n475 - 0.5*n538*n572*n86*n96 + 0.5*n600 - 0.5*n638*xTj))*(n119*n31*n541*n86/n427 - 4.0*n209*n446*n86*(pow(alpha, n25*n259)*n0*n253/n250 + n0*n1*n63) + n24*n32*(n1*n24*n25*n63*n86*xF[0]*(n209 + pow(alpha, -n0*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n209*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n12*n144*n61*n86*(n218 + pow(alpha, -n12*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n12*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n121*n24*n86*xF[11]*pow(n211 + pow(alpha, -n5*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n5*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n121*n86*xF[11]*pow(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n5*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n42*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n202*n40 - pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n5*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n122*n142*xF[12]*pow(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n6*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n43*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n232 + pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n6*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n122*n24*n86*xF[12]*pow(n212 + pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n6*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n142*n151*pow(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n94*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n55*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n237 + pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n63*n94*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n165*pow(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n16*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n53*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n236 + pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n16*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n166*pow(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n11*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n48*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n234 + pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n11*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n167*pow(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n20*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n57*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n239 + pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n20*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n172*pow(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n14*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n51*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n235 + pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n14*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n175*pow(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n93*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n59*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n241 + pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n63*n93*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n177*pow(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n9*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n46*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n233 + pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n9*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n190*pow(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n19*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n56*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n238 + pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n19*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n195*pow(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n4*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n41*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n231 + pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n4*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n196*pow(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n21*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n58*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n240 + pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n21*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n143*n153*n86/(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n143*n61*n7*n86*(n213 + pow(alpha, -n7*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n89*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n144*n171*n86/(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n145*n174*n86/(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n145*n21*n61*n86*(n227 + pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n92*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n147*n15*n61*n86*(n221 + pow(alpha, -n15*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n90*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n147*n181*n86/(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n151*n24*n86*pow(n224 + pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n87*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n154*n61*n86*xF[3]*(n1*n16*n78 + pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n16*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n155*n24*n86*pow(n216 + pow(alpha, -n10*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n10*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n155*n86*pow(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n10*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n47*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n243 - pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n10*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n157*n61*n86*xF[6]*(n1*n19*n81 + pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n19*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n163*n61*n86*xF[10]*(n1*n4*n66 + pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n4*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n165*n24*n86*pow(n222 + pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n16*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n166*n24*n86*pow(n217 + pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n11*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n167*n24*n86*pow(n226 + pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n20*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n168*n24*n86*pow(n223 + pow(alpha, -n17*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n17*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n168*n86*pow(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n148*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n54*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n208*n40 - pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n148*n158*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n169*n61*n86*xF[19]*(n1*n13*n75 + pow(alpha, -n13*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n13*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n172*n24*n86*pow(n220 + pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n14*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n175*n24*n86*pow(n228 + pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n22*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n177*n24*n86*pow(n215 + pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n91*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n178*n24*n86*pow(n214 + pow(alpha, -n8*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n63*n8*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n178*n86*pow(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n8*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n45*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n242 - pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n8*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n179*n24*n86*pow(pow(alpha, n25*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n209*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + n209, -n24)/pow(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n179*n86*(-n205*n40 - pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n205*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n18*n61*n80*n86*xF[5]*(n224 + pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n87*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n183*n24*n86*pow(n221 + pow(alpha, -n15*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n90*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n183*n86*pow(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n15*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n52*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n181*n77 - pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n15*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n189*n24*n86*pow(n213 + pow(alpha, -n7*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n89*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n189*n86*pow(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n7*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n44*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n153*n69 - pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n7*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n190*n24*n86*pow(n225 + pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n19*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n191*n24*n86*pow(n219 + pow(alpha, -n13*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n13*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n191*n86*pow(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n13*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n50*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n207*n40 - pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n13*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n194*n61*n86*xF[15]*(n215 + pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n91*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n195*n24*n86*pow(n210 + pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n4*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n196*n24*n86*pow(n227 + pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n92*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n198*n24*n86*pow(n218 + pow(alpha, -n12*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n12*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n198*n86*pow(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n95*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n49*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n171*n74 - pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n63*n95*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n200*n61*n86*(n1*n70*n8 + pow(alpha, -n8*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n63*n8*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n202*n40*n86*xF[11]/(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n203*n61*n86*(n1*n10*n72 + pow(alpha, -n10*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n10*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n204*n61*n86*(n1*n22*n84 + pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n22*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n206*n61*n86*(n1*n20*n82 + pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n20*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n207*n40*n86*xF[19]/(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n211*n30*n86*(n1*n5*n67 + pow(alpha, -n5*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n5*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n212*n29*n86*(n1*n6*n68 + pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n6*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n217*n36*n86*(n1*n11*n73 + pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n11*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n220*n35*n86*(n1*n14*n76 + pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n14*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n223*n28*n86*(n1*n17*n79 + pow(alpha, -n17*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n17*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n231*n86*xF[10]/(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n232*n86*xF[12]/(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n233*n86*xF[15]/(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n234*n86*xF[17]/(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n235*n86*xF[1]/(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n237*n86*xF[5]/(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n241*n86*xF[9]/(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n242*n86*xF[14]/(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n243*n86*xF[16]/(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n244*n86/(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n245*n86/(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n246*n86/(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n247*n86/(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n248*n86/(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)))) - 2.0*n244*n86/n356 - 2.0*n578*n86) + pow(-n38*(1.0*n209*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)/n376 + 0.5*n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n495 - 0.5*xTj*(n107*n142*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + pow(alpha, -n11*n258 + n62)*n0*n11*n229*n255 + n234) + n109*n142*xF[19]*(pow(alpha, -n13*n258 + n62)*n1*n13*n229/n249 + n219)*(pow(alpha, -n13*n258 + n62)*n13*n229*n61/n249 + n169*n61)/n406 + n109*n86*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + pow(alpha, -n13*n258 + n62)*n13*n229*n25*n255 + n207*n88)/n386 + n112*n142*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + pow(alpha, -n16*n258 + n62)*n0*n16*n229*n255 + n236) + n112*n142*xF[3]*(pow(alpha, -n16*n258 + n62)*n1*n16*n229/n249 + n222)*(pow(alpha, -n16*n258 + n62)*n16*n229*n61/n249 + n154*n61)/n409 + n115*n142*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + pow(alpha, -n19*n258 + n62)*n0*n19*n229*n255 + n238)/n392 + n139*n86*xF[12]*(pow(alpha, -n258*n6 + n62)*n1*n229*n6/n249 + n212)*(pow(alpha, -n258*n6 + n62)*n229*n6*n61/n249 + n6*n61*n68)/n399 + n139*n86*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + pow(alpha, -n258*n6 + n62)*n0*n229*n255*n6 + n232)/n379 + n142*n149*(pow(alpha, -n10*n258 + n62)*n1*n10*n229/n249 + n216)*(pow(alpha, -n10*n258 + n62)*n10*n229*n61/n249 + n182*n61)/n403 + n142*n150*(pow(alpha, -n258*n5 + n62)*n1*n229*n5/n249 + n211)*(pow(alpha, -n258*n5 + n62)*n229*n5*n61/n249 + n5*n61*n67)/n398 + n142*n152*(pow(alpha, -n12*n258 + n62)*n1*n12*n229/n249 + n218)*(pow(alpha, -n12*n258 + n62)*n12*n229*n61/n249 + n192*n61)/n405 + n142*n156*(pow(alpha, -n258*n9 + n62)*n229*n91/n249 + n215)*(pow(alpha, -n258*n9 + n62)*n229*n61*n9/n249 + n194*n61)/n402 + n142*n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + pow(alpha, -n258*n9 + n62)*n0*n229*n255*n9 + n233)/n382 + n142*n162*(pow(alpha, -n22*n258 + n62)*n1*n22*n229/n249 + n228)*(pow(alpha, -n22*n258 + n62)*n22*n229*n61/n249 + n185*n61)/n415 + n142*n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + pow(alpha, -n22*n258 + n62)*n229*n255*n93 + n241)/n395 + n142*n164*(pow(alpha, -n20*n258 + n62)*n1*n20*n229/n249 + n226)*(pow(alpha, -n20*n258 + n62)*n20*n229*n61/n249 + n193*n61)/n413 + n142*n164*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + pow(alpha, -n20*n258 + n62)*n0*n20*n229*n255 + n239)/n393 + n142*n170*(pow(alpha, -n15*n258 + n62)*n229*n90/n249 + n221)*(pow(alpha, -n15*n258 + n62)*n15*n229*n61/n249 + n15*n61*n77)/n408 + n142*n176*(pow(alpha, -n258*n7 + n62)*n229*n89/n249 + n213)*(pow(alpha, -n258*n7 + n62)*n229*n61*n7/n249 + n61*n69*n7)/n400 + n142*n184*(pow(alpha, -n258*n8 + n62)*n1*n229*n8/n249 + n214)*(pow(alpha, -n258*n8 + n62)*n229*n61*n8/n249 + n173*n61)/n401 + n142*n186*(pow(alpha, -n18*n258 + n62)*n229*n87/n249 + n224)*(pow(alpha, -n18*n258 + n62)*n18*n229*n61/n249 + n18*n61*n80)/n411 + n142*n187*(pow(alpha, -n14*n258 + n62)*n1*n14*n229/n249 + n220)*(pow(alpha, -n14*n258 + n62)*n14*n229*n61/n249 + n188*n61)/n407 + n142*n197*(pow(alpha, -n21*n258 + n62)*n229*n92/n249 + n227)*(pow(alpha, -n21*n258 + n62)*n21*n229*n61/n249 + n21*n61*n83)/n414 + n142*n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + pow(alpha, -n258*n4 + n62)*n0*n229*n255*n4 + n231) + n142*n451*xF[4]*(pow(alpha, -n17*n258 + n62)*n1*n17*n229/n249 + n223)*(pow(alpha, -n17*n258 + n62)*n17*n229*n61/n249 + n17*n61*n79) + n142*n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + pow(alpha, -n18*n258 + n62)*n229*n255*n94 + n237) + n142*n453*(pow(alpha, -n19*n258 + n62)*n1*n19*n229/n249 + n225)*(pow(alpha, -n19*n258 + n62)*n19*n229*n61/n249 + n157*n61) + n142*n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + pow(alpha, -n14*n258 + n62)*n0*n14*n229*n255 + n235) + n142*n456*(pow(alpha, -n11*n258 + n62)*n1*n11*n229/n249 + n217)*(pow(alpha, -n11*n258 + n62)*n11*n229*n61/n249 + n161*n61) + n142*n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + pow(alpha, -n21*n258 + n62)*n0*n21*n229*n255 + n240) + n142*n459*(pow(alpha, -n258*n4 + n62)*n1*n229*n4/n249 + n210)*(pow(alpha, -n258*n4 + n62)*n229*n4*n61/n249 + n163*n61) + n142*n96*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)*(pow(alpha, -n0*n258 + n62)*n1*n229*n24*n25/n249 + n1*n24*n25*n63)/n396 + n149*n86*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + pow(alpha, -n10*n258 + n62)*n10*n229*n25*n255 + n47*n72*n88)/n383 + n150*n86*(pow(alpha, n0*n38 - n258*n5)*n100*n25*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n40*n42/(n251*n99) + pow(alpha, -n258*n5 + n62)*n229*n25*n255*n5 + n202*n88)/n378 + n152*n86*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + pow(alpha, -n12*n258 + n62)*n12*n229*n25*n255 + n49*n74*n88)/n385 + n170*n86*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + pow(alpha, -n15*n258 + n62)*n15*n229*n25*n255 + n52*n77*n88)/n388 + n176*n86*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + pow(alpha, -n258*n7 + n62)*n229*n25*n255*n7 + n44*n69*n88)/n380 + n184*n86*(pow(alpha, n0*n38 - n258*n8)*n100*n25*n40*n8/(n251*n99) + pow(alpha, n0*n38 - n258*n8)*n100*n40*n45/(n251*n99) + pow(alpha, -n258*n8 + n62)*n229*n25*n255*n8 + n45*n70*n88)/n381 + n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n455*n86*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + pow(alpha, -n17*n258 + n62)*n148*n229*n25/n249 + n208*n88) + n475 + n476 + n477 + n478 + n479 + n480 + n481 + n482 + n483 + n484 + n485 + n486 + n487 + n488 + n489 + n490 + n491 + n492 + n493 + n494 + n579 + n580 + n581 + n582 + n583 + n584 + n585 + n586 + n587 + n588 + n589 + n590 + n591 + n592 + n593 + n594 + n595 + n596 + n597 + n598) - 0.5*n86*n96*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)*(pow(alpha, -n0*n258 + n62)*n1*n229*n24*n25/n249 + n1*n24*n25*n63)/n396) - n636, -n24);
25634 NP_sqrt_base = fabs(NP_sqrt_base);
25635 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
25636 NT1 = n146*(n254 - log(-pow(alpha, NP1*n0)*n229 + 1));
25637 g0 = MW[1] - Mstar;
25638 g1 = MW[0] - Mstar;
25641 g4 = MW[10] - Mstar;
25642 g5 = MW[11] - Mstar;
25643 g6 = MW[12] - Mstar;
25644 g7 = MW[13] - Mstar;
25645 g8 = MW[14] - Mstar;
25646 g9 = MW[15] - Mstar;
25647 g10 = MW[16] - Mstar;
25648 g11 = MW[17] - Mstar;
25649 g12 = MW[18] - Mstar;
25650 g13 = MW[19] - Mstar;
25651 g14 = MW[2] - Mstar;
25652 g15 = MW[3] - Mstar;
25653 g16 = MW[4] - Mstar;
25654 g17 = MW[5] - Mstar;
25655 g18 = MW[6] - Mstar;
25656 g19 = MW[7] - Mstar;
25657 g20 = MW[8] - Mstar;
25658 g21 = MW[9] - Mstar;
25663 g26 = pow(alpha, -g1);
25664 g27 = pow(alpha, -g4);
25665 g28 = pow(alpha, -g5);
25666 g29 = pow(alpha, -g6);
25667 g30 = pow(alpha, -g7);
25668 g31 = pow(alpha, -g8);
25669 g32 = pow(alpha, -g9);
25670 g33 = pow(alpha, -g10);
25671 g34 = pow(alpha, -g11);
25672 g35 = pow(alpha, -g12);
25673 g36 = pow(alpha, -g13);
25674 g37 = pow(alpha, -g0);
25675 g38 = pow(alpha, -g14);
25676 g39 = pow(alpha, -g15);
25677 g40 = pow(alpha, -g16);
25678 g41 = pow(alpha, -g17);
25679 g42 = pow(alpha, -g18);
25680 g43 = pow(alpha, -g19);
25681 g44 = pow(alpha, -g20);
25682 g45 = pow(alpha, -g21);
25683 g46 = log(xF[0]/xF[1]);
25685 g48 = pow(alpha, NP1*g0);
25686 g49 = pow(alpha, NP1*g1);
25687 g50 = pow(alpha, NP1*g4);
25689 g52 = pow(alpha, NP1*g5);
25690 g53 = pow(alpha, NP1*g6);
25691 g54 = pow(alpha, NP1*g7);
25692 g55 = pow(alpha, NP1*g8);
25693 g56 = pow(alpha, NP1*g9);
25694 g57 = pow(alpha, NP1*g10);
25695 g58 = pow(alpha, NP1*g11);
25696 g59 = pow(alpha, NP1*g12);
25697 g60 = pow(alpha, NP1*g13);
25698 g61 = pow(alpha, NP1*g14);
25699 g62 = pow(alpha, NP1*g15);
25700 g63 = pow(alpha, NP1*g16);
25701 g64 = pow(alpha, NP1*g17);
25702 g65 = pow(alpha, NP1*g18);
25703 g66 = pow(alpha, NP1*g19);
25704 g67 = pow(alpha, NP1*g20);
25705 g68 = pow(alpha, NP1*g21);
25751 g114 = g23/(g3*xF[1]);
25752 g115 = pow(alpha, g0*g47) - 1;
25753 g116 = pow(alpha, g0*g47) - 1;
25754 g117 = pow(alpha, g1*g47) - 1;
25755 g118 = pow(alpha, g14*g47) - 1;
25756 g119 = pow(alpha, g15*g47) - 1;
25757 g120 = pow(alpha, g16*g47) - 1;
25758 g121 = pow(alpha, g17*g47) - 1;
25759 g122 = pow(alpha, g18*g47) - 1;
25760 g123 = pow(alpha, g19*g47) - 1;
25761 g124 = pow(alpha, g20*g47) - 1;
25762 g125 = pow(alpha, g21*g47) - 1;
25763 g126 = pow(alpha, g4*g47) - 1;
25764 g127 = pow(alpha, g47*g5) - 1;
25765 g128 = pow(alpha, g47*g6) - 1;
25766 g129 = pow(alpha, g47*g7) - 1;
25767 g130 = pow(alpha, g47*g8) - 1;
25768 g131 = pow(alpha, g47*g9) - 1;
25769 g132 = pow(alpha, g10*g47) - 1;
25770 g133 = pow(alpha, g11*g47) - 1;
25771 g134 = pow(alpha, g12*g47) - 1;
25772 g135 = pow(alpha, g13*g47) - 1;
25773 g136 = -pow(alpha, g1*g47);
25774 g137 = -pow(alpha, g4*g47);
25775 g138 = -pow(alpha, g47*g5);
25776 g139 = -pow(alpha, g47*g6);
25777 g140 = -pow(alpha, g47*g7);
25778 g141 = -pow(alpha, g47*g8);
25779 g142 = -pow(alpha, g47*g9);
25780 g143 = -pow(alpha, g10*g47);
25781 g144 = -pow(alpha, g11*g47);
25782 g145 = -pow(alpha, g12*g47);
25783 g146 = -pow(alpha, g13*g47);
25784 g147 = -pow(alpha, g14*g47);
25785 g148 = -pow(alpha, g15*g47);
25786 g149 = -pow(alpha, g16*g47);
25787 g150 = -pow(alpha, g17*g47);
25788 g151 = -pow(alpha, g18*g47);
25789 g152 = -pow(alpha, g19*g47);
25790 g153 = -pow(alpha, g20*g47);
25791 g154 = -pow(alpha, g21*g47);
25793 g156 = -g136 - g49;
25794 g157 = -g137 - g50;
25795 g158 = -g138 - g52;
25796 g159 = -g139 - g53;
25797 g160 = -g140 - g54;
25798 g161 = -g141 - g55;
25799 g162 = -g142 - g56;
25800 g163 = -g143 - g57;
25801 g164 = -g144 - g58;
25802 g165 = -g145 - g59;
25803 g166 = -g146 - g60;
25804 g167 = -g147 - g61;
25805 g168 = -g148 - g62;
25806 g169 = -g149 - g63;
25807 g170 = -g150 - g64;
25808 g171 = -g151 - g65;
25809 g172 = -g152 - g66;
25810 g173 = -g153 - g67;
25811 g174 = -g154 - g68;
25812 g175 = pow(alpha, g1*g47) + g93;
25814 g177 = pow(alpha, g4*g47) + g94;
25815 g178 = pow(alpha, g47*g5) + g95;
25816 g179 = pow(alpha, g47*g6) + g96;
25817 g180 = pow(alpha, g47*g7) + g97;
25818 g181 = pow(alpha, g47*g8) + g98;
25819 g182 = pow(alpha, g47*g9) + g99;
25820 g183 = pow(alpha, g10*g47) + g100;
25821 g184 = pow(alpha, g11*g47) + g101;
25822 g185 = pow(alpha, g12*g47) + g102;
25823 g186 = pow(alpha, g13*g47) + g103;
25824 g187 = pow(alpha, g14*g47) + g104;
25825 g188 = pow(alpha, g15*g47) + g105;
25826 g189 = pow(alpha, g16*g47) + g106;
25827 g190 = pow(alpha, g17*g47) + g107;
25828 g191 = pow(alpha, g18*g47) + g108;
25829 g192 = pow(alpha, g19*g47) + g109;
25830 g193 = pow(alpha, g20*g47) + g110;
25831 g194 = pow(alpha, g21*g47) + g111;
25834 g197 = xF[11]/g178;
25837 g200 = xF[10]/g177;
25838 g201 = xF[19]/g186;
25839 g202 = xF[17]/g184;
25840 g203 = xF[15]/g182;
25841 g204 = xF[16]/g183;
25844 g207 = xF[12]/g179;
25845 g208 = xF[13]/g180;
25847 g210 = xF[14]/g181;
25850 g213 = xF[18]/g185;
25852 g215 = xF[17]/g164;
25856 g219 = xF[15]/g162;
25858 g221 = xF[11]/g158;
25859 g222 = xF[18]/g165;
25861 g224 = xF[13]/g160;
25862 g225 = xF[16]/g163;
25865 g228 = xF[14]/g161;
25867 g230 = xF[12]/g159;
25868 g231 = xF[19]/g166;
25869 g232 = xF[10]/g157;
25912 g275 = log(g114*g176*g24/g73);
25913 g276 = log(g114*g155*g24/g72);
25914 g277 = log(g176*g25*g70/g116);
25916 g279 = log(g155*g25*g70/g115);
25918 g281 = -g112*xF[0] - g112*xF[10] - g112*xF[11] - g112*xF[12] - g112*xF[13] - g112*xF[14] - g112*xF[15] - g112*xF[16] - g112*xF[17] - g112*xF[18] - g112*xF[19] - g112*xF[1] - g112*xF[2] - g112*xF[3] - g112*xF[4] - g112*xF[5] - g112*xF[6] - g112*xF[7] - g112*xF[8] - g112*xF[9] - g116*g198*g280 - g195*g278*(g111 + 1) - g195*g280*(pow(alpha, g21*g47) - 1) - g196*g278*(g110 + 1) - g196*g280*(pow(alpha, g20*g47) - 1) - g197*g278*(g95 + 1) - g197*g280*(pow(alpha, g47*g5) - 1) - g198*g278*g73 - g199*g278*(g105 + 1) - g199*g280*(pow(alpha, g15*g47) - 1) - g200*g278*(g94 + 1) - g200*g280*(pow(alpha, g4*g47) - 1) - g201*g278*(g103 + 1) - g201*g280*(pow(alpha, g13*g47) - 1) - g202*g278*(g101 + 1) - g202*g280*(pow(alpha, g11*g47) - 1) - g203*g278*(g99 + 1) - g203*g280*(pow(alpha, g47*g9) - 1) - g204*g278*(g100 + 1) - g204*g280*(pow(alpha, g10*g47) - 1) - g205*g278*(g109 + 1) - g205*g280*(pow(alpha, g19*g47) - 1) - g206*g278*(g106 + 1) - g206*g280*(pow(alpha, g16*g47) - 1) - g207*g278*(g96 + 1) - g207*g280*(pow(alpha, g47*g6) - 1) - g208*g278*(g97 + 1) - g208*g280*(pow(alpha, g47*g7) - 1) - g209*g278*(g108 + 1) - g209*g280*(pow(alpha, g18*g47) - 1) - g210*g278*(g98 + 1) - g210*g280*(pow(alpha, g47*g8) - 1) - g211*g278*(g104 + 1) - g211*g280*(pow(alpha, g14*g47) - 1) - g212*g278*(g107 + 1) - g212*g280*(pow(alpha, g17*g47) - 1) - g213*g278*(g102 + 1) - g213*g280*(pow(alpha, g12*g47) - 1) - g214*g278*(g93 + 1) - g214*g280*(pow(alpha, g1*g47) - 1);
25919 LpF = xF[0]*(g26 + 1.0)*(g252*g276 + g255*g279 + g69)/(g51*(g26 - 1.0)) + xF[10]*(g27 + 1.0)*(g251*g276 + g272*g279 + g69)/(g51*(g27 - 1.0)) + xF[11]*(g28 + 1.0)*(g248*g276 + g257*g279 + g69)/(g51*(g28 - 1.0)) + xF[12]*(g29 + 1.0)*(g235*g276 + g268*g279 + g69)/(g51*(g29 - 1.0)) + xF[13]*(g30 + 1.0)*(g244*g276 + g269*g279 + g69)/(g51*(g30 - 1.0)) + xF[14]*(g31 + 1.0)*(g250*g276 + g267*g279 + g69)/(g51*(g31 - 1.0)) + xF[15]*(g32 + 1.0)*(g246*g276 + g256*g279 + g69)/(g51*(g32 - 1.0)) + xF[16]*(g33 + 1.0)*(g247*g276 + g265*g279 + g69)/(g51*(g33 - 1.0)) + xF[17]*(g34 + 1.0)*(g237*g276 + g261*g279 + g69)/(g51*(g34 - 1.0)) + xF[18]*(g35 + 1.0)*(g242*g276 + g270*g279 + g69)/(g51*(g35 - 1.0)) + xF[19]*(g36 + 1.0)*(g249*g276 + g274*g279 + g69)/(g51*(g36 - 1.0)) + xF[1]*(g37 + 1.0)*(g254*g276 + g262*g279 + g69)/(g51*(g37 - 1.0)) + xF[2]*(g38 + 1.0)*(g240*g276 + g258*g279 + g69)/(g51*(g38 - 1.0)) + xF[3]*(g39 + 1.0)*(g245*g276 + g259*g279 + g69)/(g51*(g39 - 1.0)) + xF[4]*(g40 + 1.0)*(g238*g276 + g260*g279 + g69)/(g51*(g40 - 1.0)) + xF[5]*(g41 + 1.0)*(g241*g276 + g273*g279 + g69)/(g51*(g41 - 1.0)) + xF[6]*(g42 + 1.0)*(g243*g276 + g266*g279 + g69)/(g51*(g42 - 1.0)) + xF[7]*(g43 + 1.0)*(g239*g276 + g271*g279 + g69)/(g51*(g43 - 1.0)) + xF[8]*(g44 + 1.0)*(g253*g276 + g263*g279 + g69)/(g51*(g44 - 1.0)) + xF[9]*(g45 + 1.0)*(g236*g276 + g264*g279 + g69)/(g51*(g45 - 1.0));
25924 xP[0] = g117*g216*g71;
25925 xP[1] = g115*g223*g71;
25926 xP[2] = g118*g220*g71;
25927 xP[3] = g119*g226*g71;
25928 xP[4] = g120*g218*g71;
25929 xP[5] = g121*g234*g71;
25930 xP[6] = g122*g227*g71;
25931 xP[7] = g123*g233*g71;
25932 xP[8] = g124*g229*g71;
25933 xP[9] = g125*g217*g71;
25934 xP[10] = g126*g232*g71;
25935 xP[11] = g127*g221*g71;
25936 xP[12] = g128*g230*g71;
25937 xP[13] = g129*g224*g71;
25938 xP[14] = g130*g228*g71;
25939 xP[15] = g131*g219*g71;
25940 xP[16] = g132*g225*g71;
25941 xP[17] = g133*g215*g71;
25942 xP[18] = g134*g222*g71;
25943 xP[19] = g135*g231*g71;
25944 xT[0] = g113*g216*g74;
25945 xT[1] = g113*g223*g72;
25946 xT[2] = g113*g220*g75;
25947 xT[3] = g113*g226*g76;
25948 xT[4] = g113*g218*g77;
25949 xT[5] = g113*g234*g78;
25950 xT[6] = g113*g227*g79;
25951 xT[7] = g113*g233*g80;
25952 xT[8] = g113*g229*g81;
25953 xT[9] = g113*g217*g82;
25954 xT[10] = g113*g232*g83;
25955 xT[11] = g113*g221*g84;
25956 xT[12] = g113*g230*g85;
25957 xT[13] = g113*g224*g86;
25958 xT[14] = g113*g228*g87;
25959 xT[15] = g113*g219*g88;
25960 xT[16] = g113*g225*g89;
25961 xT[17] = g113*g215*g90;
25962 xT[18] = g113*g222*g91;
25963 xT[19] = g113*g231*g92;
25976 if (nuc == j || nuc == k)
26009 #ifdef PYNE_DECAY_IS_DUMMY
26019 #ifndef PYNE_IS_AMALGAMATED
26024 namespace decayers {
26026 void decay_h(
double t, std::map<int, double>::const_iterator &it, std::map<int, double> &outcomp,
double (&out)[4]) {
26028 switch (it->first) {
26030 out[0] += it->second;
26033 out[1] += it->second;
26036 double b0 = exp2(-2.572085e-09*t);
26037 out[2] += (it->second) * (b0);
26038 out[3] += (it->second) * (-1.000000e+00*b0 + 1.0);
26041 outcomp.insert(*it);
26047 void decay_he(
double t, std::map<int, double>::const_iterator &it, std::map<int, double> &outcomp,
double (&out)[4]) {
26049 switch (it->first) {
26051 out[3] += it->second;
26054 outcomp.insert(*it);
26060 std::map<int, double>
decay(std::map<int, double> comp,
double t) {
26065 double out [4] = {};
26066 map<int, double> outcomp;
26069 map<int, double>::const_iterator it = comp.begin();
26070 for (; it != comp.end(); ++it) {
26073 decay_h(t, it, outcomp, out);
26079 outcomp.insert(*it);
26085 for (i = 0; i < 4; ++i)
26092 10010000, 10020000, 10030000, 20030000
26098 #endif // PYNE_DECAY_IS_DUMMY//
std::map< std::string, unsigned int > altnames
Mapping between alternative names for reactions and the reaction id.
unsigned int hash(std::string s)
std::vector< int > beta_parent(double energy, double error)
bool operator<=(const Value &other) const
double prod_per_feed(double x_feed, double x_prod, double x_tail)
Computes the product per feed mass ratio for feed, product, and tails enrichments x_feed...
struct pyne::alpha alpha
a struct matching the '/decay/alphas' table in nuc_data.h5.
name_zz_t::iterator name_zz_iter
name and Z num iter type
static void _load_simple_xs_map(std::string energy)
comp_map::iterator comp_iter
Nuclide-mass composition iter type.
std::map< std::pair< int, int >, decay > decay_data
Mapping from a pair of nuclides in id form to a struct containing data associated with the decay from...
A struct matching the dose factor table in nuc_data.h5.
std::vector< double > ec_intensity(int parent)
Value & operator[](ArrayIndex index)
Access an array element (zero based index ).
double to_dbl(std::string s)
Converts a valid string to a float using atof().
zz_group name_to_zz_group(name_group eg)
Converts a name group to a Z number group.
std::map< std::string, std::map< int, std::map< int, double > > > simple_xs_map
map<energy, map<nuclide, map<rx, xs> > >
Material()
empty constructor
int ensdf_to_id(const char *nuc)
std::map< unsigned int, std::string > id_name
Mapping from reaction ids to reaction names.
void norm_comp()
Normalizes the mass values in the composition.
double x_prod_j
enrichment of the j-th isotope in the product stream
struct pyne::material_data material_data
A stuct for reprensenting fundemental data in a material.
double yield_fast_err
fast yield error [fraction]
std::string fluka_material_component(int fid, int nucid, std::string fluka_name)
Intermediate level call to prepare final info and call material_line(..)
std::string fluka_format_field(float field)
Convenience function to format a single fluka field.
std::vector< std::string > Members
struct pyne::atomic atomic
Structure for atomic data.
std::map< int, atomic > atomic_data_map
comp_map mult_by_mass()
Returns a composition map that has been unnormalized by multiplying each mass weight by the actual ma...
double yield_thermal
thermal yield [fraction]
Material set_range(int lower=0, int upper=10000000, double value=0.0)
Creates a new Material with the mass weights for all nuclides in the id range set to value...
std::map< int, double > q_val_map
Mapping from nuclides in id form to their q_values and the fraction of Q that comes from gammas...
name_group LAN
lanthanide name group
zz_group lan
lanthanide Z number group
const_iterator begin() const
Value(ValueType type=nullValue)
Create a default Value of the given type.
bool operator>(const Value &other) const
Cascade solve_symbolic(Cascade &orig_casc)
A multicomponent enrichment cascade solver using a symbolic solution to the mass flow rate equations...
Material decay(double t)
Decays this material for a given amount of time in seconds.
double ext_soil_dose(int nuc, int source)
Function for External Soil Dose Factors.
std::vector< std::pair< double, double > > gamma_energy(int parent)
double b(int nuc)
Computes the scattering length [cm] from the coherent and incoherent components.
void clear()
Remove all object members and array elements.
std::ostream & operator<<(std::ostream &sout, const Value &root)
Output using the StyledStreamWriter.
const_iterator end() const
bool allowComments_
true if comments are allowed. Default: true.
name_t MA_array[10]
array of minor actinide names
double branch_ratio(std::pair< int, int > from_to)
Returns the branch ratio for a parent/child nuclide pair.
std::string get_flag(char line[], int max_l)
Finds and returns the first white-space delimited token of a line.
std::vector< int > ecbp_parent(double energy, double error)
Custom exception for when an enrichment solver iteration has produced a NaN.
Material expand_elements()
Returns a copy of the current material where all natural elements in the composition are expanded to ...
std::vector< std::pair< int, int > > gamma_from_to(int parent)
Writes a Value in JSON format in a human friendly way, to a stream rather than to a string...
bool isnuclide(std::string nuc)
std::string source_string(int source)
Functions for Source Location in nuc_data.h5 and related Map Pointers.
std::string natural_naming(std::string name)
Calculates a version of the string name that is also a valid variable name.
Features()
Initialize the configuration like JsonConfig::allFeatures;.
std::string fluka_material_str(int id)
High level call to get details and call material_component(..)
Json::LargestInt LargestInt
bool operator<(const CapacityConstraint< T > &lhs, const CapacityConstraint< T > &rhs)
CapacityConstraint-CapacityConstraint comparison operator, allows usage in ordered containers...
Value removeMember(const char *key)
Remove and return the named member.
double dose_ratio(int nuc, int source)
Dose Ratio.
double swu_per_feed(double x_feed, double x_prod, double x_tail)
Computes the swu per feed ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
static const LargestUInt maxLargestUInt
Maximum unsigned integer value that can be stored in a Json::Value.
int nist_to_id(const char *nuc)
std::string last_char(std::string s)
Returns the last character in a string.
Custom exception to be thrown in the event that a required file is not able to be found...
const double Bq_per_Ci
Becquerel per Curie.
bool isEqual(const SelfType &other) const
std::string dose_lung_model(int nuc, int source)
Lung Model.
int alara_to_id(const char *nuc)
std::vector< double > beta_endpoint_energy(int parent)
complex type struct, matching PyTables definition
Value get(ArrayIndex index, const Value &defaultValue) const
If the array contains at least index+1 elements, returns the element value, otherwise returns default...
void _load_dose_map(std::map< int, dose > &dm, std::string source_path)
Loads the dose factor data from the nuc_data.h5 file into memory according to the user-input source...
std::map< std::string, std::string > get_data_checksums()
int metastable_id(int nuc, int m)
Returns the nuc_id of a metastable state.
name_group MA
minor actinide name group
Cascade()
default constructors
static const LargestInt minLargestInt
Minimum signed integer value that can be stored in a Json::Value.
double ingest_dose(int nuc, int source)
Functions for Ingestion Dose Factors and Fraction of activity that is absorbed by body fluids...
int nuc
nuclide in id form
Material del_range(int lower=0, int upper=10000000)
Creates a new Material with the all nuclides in the id range removed.
std::vector< double > beta_average_energy(int parent)
std::vector< std::pair< double, double > > gamma_total_intensity(int parent)
bool operator()(const std::pair< int, double > &lhs, const std::pair< int, double > &rhs) const
This operator compares the second item in a pair first.
Experimental and untested: represents an element of the "path" to access a node.
double coth(double x)
The hyperbolic cotangent function.
std::vector< std::pair< double, double > > betas(int parent_state_id)
std::map< int, double > atomic_mass_map
Mapping from nuclides in id form to their atomic masses.
Json::ArrayIndex ArrayIndex
std::map< int, double > natural_abund_map
Mapping from nuclides in id form to their natural abundances.
double yield_14MeV
14 MeV yield [fraction]
double l_t_per_feed
Total flow rate per feed rate.
const double barns_per_cm2
barns per cm^2
Material collapse_elements(std::set< int > exception_znum)
virtual std::string write(const Value &root)
Serialize a Value in JSON format.
Cascade default_uranium_cascade
a cascade instance with default values for a uranium enrichment.
int map_metastable[TOTAL_STATE_MAPS]
virtual std::string write(const Value &root)
Lightweight wrapper to tag static string.
static const unsigned int unknown
Unknown size marker.
std::map< std::pair< int, unsigned int >, level_data > level_data_rx_map
ValueConstIterator const_iterator
double yield_fast
fast yield [fraction]
double yield_thermal_err
thermal yield error [fraction]
void * _fill_maps()
A helper function to set the contents of the variables in this library.
std::string fluka(int nuc)
double swu_per_prod
This is the SWU for 1 kg of Product material.
std::string PYNE_DATA
Path to the directory containing the PyNE data.
std::map< int, double > to_atom_dens()
Returns a mapping of the nuclides in this material to their atom densities.
std::vector< std::pair< double, double > > decay_photon_branch_ratios(int parent)
Structure for atomic data.
bool ternary_ge(int a, int b, int c)
Returns true if a <= b <= c and flase otherwise.
struct pyne::ecbp ecbp
A struct matching the '/decay/ecbp' table in nuc_data.h5.
double mass
mass (in arbitrary units) of the Material.
std::vector< std::pair< double, double > > xrays(int parent)
static bool in(Reader::Char c, Reader::Char c1, Reader::Char c2, Reader::Char c3, Reader::Char c4, Reader::Char c5)
Cascade solve_numeric(Cascade &orig_casc, double tolerance=1.0E-7, int max_iter=100)
Finds the total flow rate (L) over the feed flow rate (F), the number of enriching stages (N)...
std::string name(int nuc)
std::string to_lower(std::string s)
Returns an all lower case copy of the string.
std::map< int, double > b_map
Mapping from nuclides in id form to their scattering length.
bool parse(const std::string &document, Value &root, bool collectComments=true)
Read a Value from a JSON document.
void _load_q_val_map()
Loads the q_value data from the nuc_data.h5 file into memory.
void decay_he(double &t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[3972])
double gamma_frac(int nuc)
A stuct for reprensenting fundemental data in a material.
double prod_per_tail(double x_feed, double x_prod, double x_tail)
Computes the product per tails mass ratio for feed, product, and tails enrichments x_feed...
const double N_A
Avogadro's Number.
static const UInt maxUInt
Maximum unsigned int value that can be stored in a Json::Value.
#define JSON_ASSERT_MESSAGE(condition, message)
std::vector< std::pair< double, double > > decay_beta_branch_ratios(int parent)
std::vector< double > ecbp_endpoint_energy(int parent)
returns a list of electron capture/ beta plus decay endpoint energies from input parent nuclide ...
AllocatedType * allocate()
allocate space for an array of objectPerAllocation object.
std::map< std::string, unsigned int > name_id
Mapping from reaction names to reaction ids.
double Mstar
mass separation factor
void load_json(Json::Value)
Loads a JSON instance tree into this Material.
name_t FP_array[88]
array of fission product names
Material operator/(double)
Divides a material's mass.
bool operator<(const Value &other) const
xd_complex_t b_coherent(int nuc)
Finds the coherent scattering length [cm] for a nuclide nuc.
int id_to_state_id(int nuc_id)
void setComment(const char *comment, CommentPlacement placement)
Comments must be //... or /* ... */.
const Value & resolve(const Value &root) const
int id_from_level(int nuc, double level)
Returns the nuc_id of an energy level.
std::map< std::pair< int, double >, alpha > alpha_data
A vector of structs containing alpha data for access in memory.
const char * c_str() const
double dose_fluid_frac(int nuc, int source)
Fluid Fraction.
Material operator+(double)
Adds mass to a material instance.
a struct matching the '/neutron/wimsd_fission_product' table in nuc_data.h5.
name_t LAN_array[15]
array of lanthanide names
Configuration passed to reader and writer.
std::map< unsigned int, unsigned int > mt_id
Mapping from MT numbers to reaction names.
static std::string alphabet
uppercase alphabetical characters
Material sub_elem(int element)
Creates a sub-Material of only the given element.
a comment placed on the line before a value
void write_json(char *filename)
Writes the Material out to a JSON file.
bool operator!=(const Value &other) const
zzname_t zz_fluka
nucid to fluka-name map
bool isValidIndex(ArrayIndex index) const
Return true if index < size().
static std::string fluka_mat_strings[]
int fluka_to_id(std::string name)
Custom exception for when a path is not found in an HDF5 file.
a struct matching the '/decay/betas' table in nuc_data.h5.
static const UInt64 maxUInt64
Maximum unsigned 64 bits int value that can be stored in a Json::Value.
bool contains_substring(std::string s, std::string substr)
Returns true if substr is in s.
pyne::Material mat_prod
product material
std::vector< int > gamma_parent(double energy, double error)
zzname_t get_zz_fluka()
Creates standard nucid to fluka-name mapping.
std::vector< int > beta_child(double energy, double error)
std::vector< std::pair< int, int > > gamma_parent_child(double energy, double error)
static const Int64 maxInt64
Maximum signed 64 bits int value that can be stored in a Json::Value.
bool toggle_warnings()
Toggles warnings on and off.
std::vector< int > ecbp_child(double energy, double error)
Material sub_fp()
Creates a sub-Material of only fission products.
double endftod_f(char *s)
Converts a string from ENDF format to a float.
void _recompute_nm(Cascade &casc, double tolerance=1.0E-7)
So,ves for valid stage numbers N &nd M of a casc.
std::map< name_t, zz_t > name_zz_t
name and Z num map type
SelfType & operator=(const ValueIteratorBase &other)
std::string NUC_DATA_PATH
Path to the nuc_data.h5 file.
a struct matching the q_value table in nuc_data.h5.
bool not_fluka_builtin(std::string fluka_name)
Convenience function to tell whether a given name needs a material card.
void enableYAMLCompatibility()
Material sub_ma()
Creates a sub-Material of only minor actinides.
bool isConvertibleTo(ValueType other) const
double feed_per_prod(double x_feed, double x_prod, double x_tail)
Computes the feed per product mass ratio for feed, product, and tails enrichments x_feed...
std::map< std::pair< int, double >, beta > beta_data
A vector of structs containing beta data for access in memory.
Outputs a Value in JSON format without formatting (not human friendly).
bool isMember(const char *key) const
Return true if the object has a member named key.
const char * memberName() const
Return the member name of the referenced Value. "" if it is not an objectValue.
#define NUM_RX_NAMES
Number of reactions supported by default.
int child(int nuc, unsigned int rx, std::string z="n")
static std::string codePointToUTF8(unsigned int cp)
Converts a unicode code-point to UTF-8.
double yield_fast
fast yield [fraction]
a struct matching the '/decay/alphas' table in nuc_data.h5.
void _recompute_prod_tail_mats(Cascade &casc)
This function takes a given initial guess number of enriching and stripping stages for a given compos...
void write_hdf5(char *filename, char *datapath, char *nucpath, float row=-0.0, int chunksize=100)
Writes this material out to an HDF5 file.
double alphastar_i(double alpha, double Mstar, double M_i)
Computes the nuclide-specific stage separation factor from the overall stage separation factor alpha...
std::map< zz_t, name_t > zzname_t
Z num to name map type.
const double Ci_per_Bq
Curies per Becquerel.
Cascade _fill_default_uranium_cascade()
Greates a cascade instance with default values for a uranium enrichment.
int state_id_to_id(int state)
zz_group act
actinide Z number group
std::map< std::pair< std::string, int >, unsigned int > offset_id
Mapping from particle type and offset pairs to reaction ids.
static const Int minInt
Minimum signed int value that can be stored in a Json::Value.
void normalize()
Normalizes the mass.
std::map< int, dose > genii_dose_map
void resize(ArrayIndex size)
Resize the array to size elements.
Value & operator=(const Value &other)
std::map< int, double > comp_map
Nuclide-mass composition map type.
std::string valueToString(LargestInt value)
double yield_fast_err
fast yield error [fraction]
void _load_comp_protocol1(hid_t db, std::string datapath, int row)
Loads the matrial composition from an HDF5 file according to the layout defined by protocol 1...
void _load_scattering_lengths()
Loads the scattering length data from the nuc_data.h5 file into memory.
difference_type computeDistance(const SelfType &other) const
static bool isControlCharacter(char ch)
Returns true if ch is a control character (in range [0,32[).
std::string to_str(int t)
bool operator>=(const Value &other) const
struct pyne::dose dose
A struct matching the dose factor table in nuc_data.h5.
a struct matching the '/decay/decays' table in nuc_data.h5.
std::map< CZString, Value > ObjectValues
std::string nist(int nuc)
double state_energy(int nuc)
Returns the excitation energy [MeV] of a nuc in a given state.
double yield_14MeV
14 MeV yield [fraction]
BatchAllocator(unsigned int objectsPerPage=255)
std::map< std::pair< std::string, unsigned int >, int > id_offset
Mapping from particle type and reaction ids to offsets.
static const Int64 minInt64
Minimum signed 64 bits int value that can be stored in a Json::Value.
std::string name_t
name type
double mass_density(double num_dens=-1.0, double apm=-1.0)
Computes, sets, and returns the mass density when num_dens is greater than or equal zero...
double inhale_dose(int nuc, int source)
Functions for Inhalation Dose Factors and Lung Model used to obtain dose factors. ...
double endftod_cpp(char *s)
Converts a string from ENDF format to a float.
int cinder_to_id(int nuc)
Reader()
Constructs a Reader allowing all features for parsing.
std::vector< std::pair< double, double > > xrays()
Returns a list of x-rays average energies in keV and intensities in decays/s material unnormalized...
std::string zzllaaam(int nuc)
a struct matching the '/decay/level_list' table in nuc_data.h5.
void _load_ndsfpy()
Loads the NDS fission product yield data from the nuc_data.h5 file into memory.
A struct matching the '/decay/ecbp' table in nuc_data.h5.
std::string slice_from_end(std::string s, int n=-1, int l=1)
Returns the slice of a string s using the negative index n and the length of the slice l...
std::vector< std::pair< double, double > > ecbp_xrays(int parent)
std::vector< std::pair< double, double > > gamma_photon_intensity(int parent)
#define JSON_ASSERT_UNREACHABLE
std::vector< std::pair< double, double > > normalize_radioactivity(std::vector< std::pair< double, double > > unnormed)
Takes a list of photon energies and intensities and normalizes them so the sum of the intensities is ...
double natural_abund(int nuc)
Returns the natural abundance of a nuclide nuc.
bool operator==(const Value &other) const
std::vector< std::pair< double, double > > calculate_xray_data(int z, double k_conv, double l_conv)
double ext_air_dose(int nuc, int source)
Returns the dose factors of a nuclide.
std::vector< std::pair< double, double > > gamma_conversion_intensity(int parent)
name_group ACT
actinide name group
comp_map comp
composition, maps nuclides in id form to normalized mass weights.
static void uintToString(LargestUInt value, char *¤t)
Converts an unsigned integer to string.
object value (collection of name/value pairs).
static Features all()
A configuration that allows all features and assumes all strings are UTF-8.
std::pair< double, double > decay_photon_branch_ratio(std::pair< int, int >)
comp_map decay_heat()
Calculates the decay heat of a material based on the composition and each nuclide's mass...
Json::LargestUInt LargestUInt
name_group FP
fission product name group
name_t TRU_array[22]
array of transuranic names
std::string fluka_material_line(int znum, double atomic_mass, int fid, std::string fluka_name)
Format information into a FLUKA material card.
Custom exception for declaring a simple_xs request invalid.
std::map< std::pair< int, double >, ecbp > ecbp_data
A vector of structs containing ecbp data for access in memory.
Material sub_lan()
Creates a sub-Material of only lanthanides.
xd_complex_t b_incoherent(int nuc)
Finds the incoherent scattering length [cm] for a nuclide nuc.
Material del_mat(std::set< int > nucset)
Creates a new Material with the all nuclides in nucset removed.
int to_int(std::string s)
Converts a string of digits to an int using atoi().
void swap(Value &other)
Swap values.
std::map< int, pyne::dose > & dose_source_map(int source)
name_zz_t fluka_zz
fluka-name to nucid map
Material sub_range(int lower=0, int upper=10000000)
Creates a sub-Material based on a range of id-form integers.
char UIntToStringBuffer[uintToStringBufferSize]
int parent(int nuc, unsigned int rx, std::string z="n")
UInt index() const
Return the index of the referenced Value. -1 if it is not an arrayValue.
CustomWriter(std::string opencurly="{", std::string closecurly="}", std::string opensquare="[", std::string closesquare="]", std::string colon=":", std::string comma=",", std::string indent=" ", int maxWidth=74)
double alpha
stage separation factor
ValueType
Type of the value held by a Value object.
struct pyne::decay decay
a struct matching the '/decay/decays' table in nuc_data.h5.
double _deltaU_i_OverG(Cascade &casc, int i)
Solves for a stage separative power relevant to the ith component per unit of flow G...
std::map< int, xd_complex_t > b_coherent_map
Mapping from nuclides in id form to their coherent scattering length.
struct pyne::gamma gamma
a struct matching the '/decay/gammas' table in nuc_data.h5.
double q_val(int nuc)
Returns the q_value of a nuclide nuc.
std::string to_upper(std::string s)
switches endftod to fast cpp version
Cascade multicomponent(Cascade &orig_casc, char *solver, double tolerance=1.0E-7, int max_iter=100)
zz_group fp
fission product Z number group
const double MeV_per_MJ
MeV per MJ.
struct pyne::level_data level_data
a struct matching the '/decay/level_list' table in nuc_data.h5.
a struct matching the '/decay/gammas' table in nuc_data.h5.
comp_map dose_per_g(std::string dose_type, int source=0)
Caclulates the dose per gram using the composition of the the material, the dose type desired...
void _reset_xjs()
Sets x_feed_j to j-th value of mat_feed.
a comment just after a value on the same line
static void releaseStringValue(char *value)
Free the string duplicated by duplicateStringValue().
void _load_atomic_mass_map()
Loads the atomic mass and natural abundance data from the nuc_data.h5 file into memory.
#define JSON_FAIL_MESSAGE(message)
int nuc
nuclide in id form
std::string serpent(int nuc)
void _load_comp_protocol0(hid_t db, std::string datapath, int row)
Loads the matrial composition from an HDF5 file according to the layout defined by protocol 0...
static bool containsControlCharacter(const char *str)
std::istream & operator>>(std::istream &sin, Value &root)
Read from 'sin' into 'root'.
std::string mcnp(std::string frac_type="mass")
Return an mcnp input deck record as a string.
base class for Value iterators.
std::set< std::string > fluka_builtin(pyne::fluka_mat_strings, pyne::fluka_mat_strings+pyne::FLUKA_MAT_NUM)
------------------------------------------------------------------------—// Create a set out of the s...
bool hasComment(CommentPlacement placement) const
int map_nuc_ids[TOTAL_STATE_MAPS]
double tail_per_feed(double x_feed, double x_prod, double x_tail)
Computes the tails per feed mass ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
int j
Component to enrich (U-235), id form.
std::vector< int > alpha_child(double energy, double error)
std::map< std::pair< int, double >, level_data > level_data_lvl_map
Mapping from nuclides in id form to a struct containing data associated with that level...
Custom exception for invalid HDF5 protocol numbers.
std::vector< std::pair< double, double > > gamma_xrays(int parent)
std::vector< double > beta_intensity(int parent)
double slope(double x2, double y2, double x1, double y1)
Finds the slope of a line from the points (x1, y1) and (x2, y2).
double N
number of enriching stages
bool iselement(std::string nuc)
std::vector< T > data_access(double emin, double emax, size_t valoffset, std::map< std::pair< int, double >, U > &data)
Access data in a std::map<std::pair<int, double> for a range of values of the second member of the pa...
name_group TRU
transuranic name group
comp_map activity()
Calculates the activity of a material based on the composition and each nuclide's mass...
static std::string words
string of all valid word characters for variable names in programing languages.
double yield_14MeV_err
14 MeV yield error [fraction]
std::string getFormattedErrorMessages() const
Returns a user friendly string that list errors in the parsed document.
std::vector< double > ecbp_average_energy(int parent)
zz_group ma
minor actinide Z number group
name_zz_t name_zz
name to Z num map
bool empty() const
Return true if empty array, empty object, or null; otherwise, false.
std::map< std::pair< int, int >, ndsfpysub > ndsfpy_data
double swu_per_tail(double x_feed, double x_prod, double x_tail)
Computes the swu per tails ratio for feed, product, and tails enrichments x_feed, x_prod...
Value key() const
Return either the index or the member name of the referenced value as a Value.
int zzllaaam_to_id(const char *nuc)
double yield_14MeV_err
14 MeV yield error [fraction]
Path(const std::string &path, const PathArgument &a1=PathArgument(), const PathArgument &a2=PathArgument(), const PathArgument &a3=PathArgument(), const PathArgument &a4=PathArgument(), const PathArgument &a5=PathArgument())
std::map< unsigned int, std::string > labels
Mapping from reaction ids to labels (short descriptions).
double M
number of stripping stages
std::vector< double > decay_branch_ratios(int parent)
std::set< std::string > names
Set of reaction names, must be valid variable names.
std::set< int > decay_children(int nuc)
Returns a set of decay children of a nuc.
a comment on the line after a value (only make sense for root value)
const double cm2_per_barn
cm^2 per barn
name_zz_t get_fluka_zz()
Creates standard fluka-name to nucid mapping.
struct pyne::beta beta
a struct matching the '/decay/betas' table in nuc_data.h5.
bool operator!() const
Return isNull()
zzname_t get_zz_name()
Creates standard Z number to name mapping.
void from_atom_frac(std::map< int, double > atom_fracs)
Sets the composition, mass, and atoms_per_molecule of this material to those calculated from atom_fra...
double swu_per_prod(double x_feed, double x_prod, double x_tail)
Computes the swu per product ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
std::string alara(int nuc)
static std::string digits
string of digit characters
std::ostream & operator<<(std::ostream &os, Material mat)
Converts a Material to a string stream representation for canonical writing.
void copy(const SelfType &other)
std::string asString() const
a struct matching the atomic_mass table in nuc_data.h5.
double yields
fission product yield, fraction [unitless]
std::string fluka_compound_str(int id, std::string frac_type="mass")
Return FLUKA compound card and the material card for the named compound but not the material cards of...
std::vector< int > gamma_child(double energy, double error)
Custom exception for when an existing file is not in a valid HDF5 format.
std::string valueToQuotedString(const char *value)
std::string toStyledString() const
std::vector< double > bp_intensity(int parent)
std::string getComment(CommentPlacement placement) const
Include delimiters and embedded newlines.
name_group::iterator name_group_iter
name grouping iter type
std::map< unsigned int, unsigned int > id_mt
Mapping from reaction ids to MT numbers.
a struct matching the '/neutron/nds_fission_product' table in nuc_data.h5
static bool in(Reader::Char c, Reader::Char c1, Reader::Char c2, Reader::Char c3, Reader::Char c4)
std::string capitalize(std::string s)
Returns a capitalized copy of the string.
static hid_t PYTABLES_COMPLEX128
The HDF5 id for a complex data type compatible with PyTables generated data.
Value & make(Value &root) const
Creates the "path" to access the specified node and returns a reference on the node.
SelfType & operator=(const SelfType &other)
bool operator==(const CapacityConstraint< T > &lhs, const CapacityConstraint< T > &rhs)
CapacityConstraint-CapacityConstraint equality operator.
comp_map decay(comp_map, double)
std::map< unsigned int, std::string > docs
Mapping from reaction ids to documentation strings (long descriptions).
void decay_h(double &t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[3972])
~Material()
default destructor
virtual std::string write(const Value &root)
int zzzaaa_to_id(int nuc)
void decay_c(double &t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[3972])
double value_func(double x)
Computes the value or separation potential of an assay x.
std::vector< std::pair< double, double > > photons(bool norm)
Returns a list of photon energies in keV and intensities in decays/s/atom material unnormalized...
static const Int maxInt
Maximum signed int value that can be stored in a Json::Value.
std::map< std::string, std::string > data_checksums
Mapping from nodes in nuc_data.h5 to hashes of nodes.
std::vector< double > alpha_energy(int parent)
std::vector< std::pair< double, double > > gammas(int parent_state_id)
Returns a list of energies and intensities normalized to branching ratios.
LargestUInt asLargestUInt() const
void warning(std::string s)
Prints a warning message.
double yield_thermal_err
thermal yield error [fraction]
int serpent_to_id(const char *nuc)
void write(std::ostream &out, const Value &root)
Serialize a Value in JSON format.
double tail_per_prod(double x_feed, double x_prod, double x_tail)
Computes the tails per product mass ratio for feed, product, and tails enrichments x_feed...
zz_group tru
transuranic Z number group
const double pi
pi = 3.14159265359
static Features strictMode()
A configuration that is strictly compatible with the JSON specification.
void release(AllocatedType *object)
Release the object.
std::pair< double, double > decay_beta_branch_ratio(std::pair< int, int >)
const double MeV_per_K
MeV per Kelvin.
std::map< std::pair< int, double >, gamma > gamma_data
Constant that specify the size of the buffer that must be passed to uintToString. ...
void from_json(char *filename)
Reads data from a JSON file at filename into this Material instance.
std::map< int, double > to_atom_frac()
Returns a mapping of the nuclides in this material to their atom fractions.
double half_life(int nuc)
Returns the half life for a nuclide nuc.
Json::Value dump_json()
Dumps the Material out to a JSON instance tree.
Material set_mat(std::set< int > nucset, double value)
Creates a new Material with the mass weights for all nuclides in nucset set to value.
std::vector< std::pair< double, double > > alphas(int parent_state_id)
name_t ACT_array[15]
array of actinide names
Unserialize a JSON document into a Value.
std::map< int, int > state_id_map
const char * asCString() const
StyledStreamWriter(std::string indentation="\t")
unsigned long long int UInt64
double decay_const(int nuc)
Returns the decay constant for a nuclide nuc.
std::set< zz_t > zz_group
Z number grouping type (for testing containment)
double yield_thermal
thermal yield [fraction]
void write_text(char *filename)
Writes the Material out to a simple plaintext file readable by from_text().
double fpyield(std::pair< int, int > from_to, int source, bool get_error)
Returns the fission product yield for a parent/child nuclide pair.
std::string _names[NUM_RX_NAMES]
Raw array of reaction names.
std::map< int, xd_complex_t > b_incoherent_map
Mapping from nuclides in id form to their incoherent scattering length.
#define JSON_ASSERT(condition)
void _load_wimsdfpy()
Loads the WIMSD fission product yield data from the nuc_data.h5 file into memory. ...
double simple_xs(int nuc, int rx, std::string energy)
returns the microscopic cross section in barns for the specified nuclide, reaction, and energy group.
static const LargestInt maxLargestInt
Maximum signed integer value that can be stored in a Json::Value.
std::vector< std::pair< double, double > > decay_half_lifes(int)
std::string fluka(int id, std::string frac_type="mass")
Return a fluka input deck MATERIAL card as a string.
std::vector< int > decay_data_children(int parent)
Material operator*(double)
Multiplies a material's mass.
void decay_br(double &t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[3972])
int zzaaam_to_id(int nuc)
const double sec_per_day
seconds per day
Top-level enrichment functionality.
name_zz_t get_name_zz()
Creates standard name to Z number mapping.
std::string replace_all_substrings(std::string s, std::string substr, std::string repstr)
Replaces all instance of substr in s with repstr.
static bool containsNewLine(Reader::Location begin, Reader::Location end)
A set of physical parameters used to specify an enrichment cascade.
a struct matching the '/neutron/scattering_lengths' table in nuc_data.h5.
static char * duplicateStringValue(const char *value, unsigned int length=unknown)
Duplicates the specified string value.
void from_text(char *filename)
Reads data from a plaintext file at filename into this Material instance.
Iterator for object and array value.
Material sub_tru()
Creates a sub-Material of only transuranics.
Members getMemberNames() const
Return a list of the member names.
std::map< int, dose > epa_dose_map
Mapping from int to dose for 3 sources.
double feed_per_tail(double x_feed, double x_prod, double x_tail)
Computes the feed per tails mass ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
double atomic_mass(int nuc)
Returns the atomic mass of a nuclide nuc.
bool file_exists(std::string strfilename)
Returns true if the file can be found.
LargestInt asLargestInt() const
void pyne_start()
Initializes PyNE based on environment.
zzname_t zz_name
Z num to name map.
int compare(const Value &other) const
void _load_data< level_data >()
Writes a Value in JSON format in a human friendly way.
double(* endftod)(char *s)
endftod function pointer. defaults to fortran
void from_hdf5(char *filename, char *datapath, int row=-1, int protocol=1)
Loads a material from an HDF5 file into this object.
Material composed of nuclides.
std::string remove_characters(std::string s, std::string chars)
Removes all characters in the string chars from s.
int nuc
nuclide in id form
ArrayIndex size() const
Number of values in array or object.
Custom exception for declaring a value not to be a valid reaction.
Custom expection for declaring that a value does not follow a recognizable nuclide naming convention...
bool strictRoot_
true if root must be either an array or an object value. Default: false.
double solve_line(double x, double x2, double y2, double x1, double y1)
Solves the equation for the line y = mx + b, given x and the points that form the line: (x1...
Value & append(const Value &value)
Append value to array at the end.
const iterator for object and array value.
Material sub_mat(std::set< int > nucset)
Creates a sub-Material with only the nuclides present in nucset.
int offset(int dz, int da, int ds=0)
A helper function to compute nuclide id offsets from z-, a-, and s- deltas.
std::string getFormatedErrorMessages() const
Returns a user friendly string that list errors in the parsed document.
double molecular_mass(double apm=-1.0)
Calculates the atomic weight of this material based on the composition and the number of atoms per mo...
a struct for the nds data for fpyield
Material sub_act()
Creates a sub-Material of only actinides.
double swu_per_feed
This is the SWU for 1 kg of Feed material.
std::pair< double, double > decay_branch_ratio(std::pair< int, int >)
T get_array_index(hid_t dset, int n, hid_t dtype=H5T_NATIVE_DOUBLE)
Retrieves the nth index out of the dataset dset (which has an HDF5 datatype dtype).
double tanh(double x)
The hyperbolic tangent function.
std::vector< int > alpha_parent(double energy, double error)
double get_comp_sum()
Computes the total mass stored in the composition.
double x_tail_j
enrichment of the j-th isotope in the tails stream
std::map< std::pair< int, int >, double > wimsdfpy_data
Mapping from nuclides in id form to their scattering length.
void * _
A dummy variable used when calling _fill_maps().
pyne::Material mat_feed
feed material
std::set< name_t > name_group
name grouping type (for testing containment)
double x_feed_j
enrichment of the j-th isotope in the feed stream
std::pair< double, double > decay_half_life(std::pair< int, int >)
std::map< int, double > gamma_frac_map
double number_density(double mass_dens=-1.0, double apm=-1.0)
Computes and returns the number density of the material using the mass density if mass_dens is greate...
std::vector< double > alpha_intensity(int parent)
int k
Component to de-enrich, or strip (U-238), id form.
pyne::Material mat_tail
tails material
std::map< int, dose > doe_dose_map
~Cascade()
default destructor
bool path_exists(hid_t h5file, std::string path)
Determines if a path exists in an hdf5 file.
std::string remove_substring(std::string s, std::string substr)
Creates a copy of s with all instances of substr taken out.
array value (ordered list)
std::vector< std::pair< double, double > > gammas()
Returns a list of gamma-rays energies in keV and intensities in decays/s/atom material unnormalized...
Cascade _norm_comp_secant(Cascade &casc, double tolerance=1.0E-7, int max_iter=100)
This function solves the whole system of equations.